This code could be used to pass nearly anything. Another alternative would be as Eric has recomended in the past to create a function that accepts a parameter. I like the property method because I can use the info when I am ready.

---

' ** Module code to emulate your calling procedure
Sub main()
    Form1.pParam = "Hello Form."
    Form1.Show
End Sub

---

'  ** Form code to accept parameters
Private m_varpParam As Variant 

Public Property Get pParam() As Variant
    pParam = m_varpParam
  End Property
  Public Property Let pParam(ByVal varpParam As Variant)
    m_varpParam = varpParam
End Property

' Example to show param came through.
Private Sub Form_Load()
    Me.Caption = m_varpParam
End Sub