此外,如果你是在事件里面写的话,那么sender可以代表驱动这个事件的那个具体的控件,比如:
Private Sub TextBox1_Changed(ByVal sender As Object ....) Handles TextBox1.Changed
Dim t As TextBox
t = CType(sender, TextBox)
' 此时 t 就是 textbox1
End Sub
如果你想把这个控件传给另一个函数,你可以这样做:
Private Sub XXX_EventXXX(ByVal sender As Object, ByVal e As ...EventArgs) Handles XXX.EventXXX
my_function(sender)
End Sub