Passing forms as arguments

[rdharmar]

I need to pass a form as an arguments to sub routine in a Module. I get a type mismatch error? What's wrong with this?
Thanks!

in the Form module:

loadListBox(frmABC)


in the BAS Module:

Sub loadListBox(formName as form)

End Sub

 

[CajunCenturion]

change the syntax of the call to either one of the following

loadListBox frmABC ' no parens

or

call loadlistbox (frmABC) ' with parens


Good Luck
------------
Select * from Users where Clue > 0
0 rows returned

 

[Nachocat]

Try something like this...
in the Form module:

Call loadListBox(frmABC)


in the BAS Module:

Sub loadListBox(Source as Control)

If TypeOf Source Is Form Then
With Source
.Caption = "This is My Form"
End With
End If

End Sub

Hope this helps

 

[rdharmar]

Thanks guys!