Passing TextBox Control Name????

[tomtan]

My problem is I try to pass the form name And textbox name to a Module outside the original program.

Private Sub Text1_GotFocus()
MarkText Me,Text1
End Sub

Private Sub MarkText(fm As Form ,tb As TextBox)
fm.tb.SelStart = 0
fm.tb.SelLength = Len(tb.Text)
End Sub

This will give me an error. But If I remove the fm..

tb.SelStart = 0
tb.SelLength = Len(tb.Text)

The code will run smoothly..