我在窗体中有很多个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

解决方案 »

  1.   

    最好用数组
    或TextClick Text1
      

  2.   

    TextClick Text1 和 TextClick(Text1)
    有什么区别?为什么TextClick Text1没问题?
      

  3.   

    带括号调用函数、过程要加关键字call
    call fun(x)
    不加call而用括号就会对形参取值,对于textbox来说,就取了它的默认属性text,是字符串,所以报类型不符。
    TextClick(Text1) 等于 TextClick Text1.text
    正确调用:
    call TextClick(Text1)