能否将控件名称当作变量传递？或者有什么好方法？关于语法

[sprite14]

Private Sub TextBox1_Click()
CheckRow TextBox1, TextBox1.Text, 1
End Sub

Private Sub TextBox2_Click()
CheckRow TextBox2, TextBox2.Text, 2
End Sub

Function CheckRow(TxtB As Object, Txt As String, TxtIndex As Integer)
TxtB.text=""
我就是想将Textbox1或者Textbox2当作变量来传递，同时改变他的属性，可以这么做吗？
End Function

[lxcc]

Function CheckRow(TxtB As TextBox, Txt As String, TxtIndex As Integer)
即可

[sprite14]

UPUP
请帮忙啊
很着急

[lxcc]

可以！

[sprite14]

请告诉我方法啊
我现在这种做法提示错误
是我声明的类型不对吗？

[dream901]

不用写其他的东西,就传一个对象就行了

Private Sub Form_Load()
text1.text="this is a test"
Call GetObj(Text1)
End Sub


Private Sub GetObj(objtmp As Object)
objtmp.Text = "Get it!"
End Sub

[qibo2002]

Function CheckRow(TxtB As TextBox)
TxtB.text="dddd"
End Function

[qibo2002]

声明的时候不用 as object 用控件的类型 很方便！