我在窗体中有很多个TextBox,单击TextBox后的操作都基本一样。想写一个Sub(arg1 As TextBox)的过程来统一操作,但运行的时候提示“类型不匹配”,是怎么原因,请问应该怎么写???Private Sub Text1_Click()
TextClick(Text1)
End SubPublic Sub TextClick(Text_ID As TextBox) '这里提示类型不匹配
中间过程...
Text_ID.Text = "返回值"
End Sub
TextClick(Text1)
End SubPublic Sub TextClick(Text_ID As TextBox) '这里提示类型不匹配
中间过程...
Text_ID.Text = "返回值"
End Sub
或TextClick Text1
有什么区别?为什么TextClick Text1没问题?
call fun(x)
不加call而用括号就会对形参取值,对于textbox来说,就取了它的默认属性text,是字符串,所以报类型不符。
TextClick(Text1) 等于 TextClick Text1.text
正确调用:
call TextClick(Text1)