HELP: Unable to clear values for control of type text in a userfor
Sam,
try it this way:
Private Sub StudentId_Change()
Dim ctl As Control
Dim CtrlType As String
For Each ctl In Me.Frame1.Controls
CtrlType = TypeName(ctl)
If CtrlType = "TextBox" Then
ctl.Value = ""
End If
Next ctl
End Sub
--
jb
"sam" wrote:
Hi All,
I have textboxes and comboboxes located in Frame1 and I only want to clear
values in Textboxes when a user changes Student_Id field
Here is my code so far:
Private Sub StudentId_Change()
For Each ctl In Me.Frame1.Controls
If TypeOf ctl Is TextBox Then
ctl.Value = ""
End If
Next
End Sub
For some reason the values in textboxes are not cleared, I inserted break
points and found out that the control type of Textbox is not identified and
hence passes the If statement directly to End if
Thanks in advance
|