pass the control object:VB Code:
Private Function MyFunction(ByRef oListBox As ListBox) As Boolean Debug.Print oListBox.Name 'etc. End Function Private Sub Command1_Click() MyFunction List1 End Sub
|
Results 1 to 2 of 2
Threaded View
|
Click Here to Expand Forum to Full Width |