passing a form as form

[m8Ball]

This is an example of something I am trying to do. Can anyone help me with this code:

'(placed in form @ form load)

Private Sub Form_Load()
initialize Me
End Sub

'(placed in code module)

Public Sub initialize(fmInit As Form)

fmInit.Caption = "OK"

End Sub

The compiler says "type mismatch"