控件参数是什么概念？textbox的mousedown事件能不能当成控件参数来传递？如何实现？

'Text1的MouseDown事件只能作为引用：
Private Sub Form_Click()
'TextBox的Ctrl+单击事件
Call Text1_MouseDown(VbKeyLButton,VbCtrlMask,0,0)

End Sub

'如果要传递控件：
Private Function FormatStrings(byRef oText as TextBox） As String
FormatStrings=Trim$(oText.Text)
End Function

'如果要传递一个函数也可以实现：
Private Sub Form_Load()
Call SetWindowsHookEx(WH_KEYBOARD, AddressOf HookFunc, App.hInstance, App.ThreadID)
End Sub

'Module
Public Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
Public Declare Function CallNextHookEx Lib "user32" (ByVal hHook As Long, ByVal nCode As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const WH_KEYBOARD = 2
Public HookHwnd As Long

Public Function HookFunc(ByVal nCode As Long, ByVal wParam A