Spot the error in this code .....

[TheBionicOrange]

Can anyone tell me what, in the following code, I would need to change to make it work when I convert it to an ActiveX form ?

Private Sub Check_Fields()
    
    For Each Ctrl In frmMain
        If TypeOf Ctrl Is TextBox Or TypeOf Ctrl Is ComboBox Then
            If Ctrl = "" And Ctrl.Visible Then
                FieldsOK = False
                MsgBox "You cannot have any blank fields !", vbOKOnly, "Empty Field"
                Ctrl.BackColor = vbWhite
                Ctrl.SetFocus
                Exit Sub
            End If
        End If
    Next Ctrl
    
    
End Sub

Thanks a lot ....

[Bonker Gudd]

For Each Ctrl In [b]frmMain.Controls[/b]
        If TypeOf Ctrl Is TextBox Or TypeOf Ctrl Is ComboBox Then
            If Ctrl = "" And Ctrl.Visible Then
                FieldsOK = False
                MsgBox "You cannot have any blank fields !", vbOKOnly, "Empty Field"
                Ctrl.BackColor = vbWhite
                Ctrl.SetFocus
                Exit Sub
            End If
        End If
    Next Ctrl

[TheBionicOrange]

Nope ... that didn't work.

The code does work before you convert the form, but I guess IE5 can't interpret it when its an ActiveX !

Any other ideas ?