VBA-“;不兼容类型错误“;那太疯狂了

VBA-“;不兼容类型错误“;那太疯狂了,vba,textbox,Vba,Textbox,我的问题很简单,很可笑 如果我创建一个模块,如: Sub Check_TextBox(ByVal CheckThisBox As TextBox) 'With anything. Even if I leave this blank.. End sub 并尝试在用户窗体上调用它,如: Private Sub CommandButton1_Click() Call Check_TextBox(Me.TextBox1) End Sub 它只是给了我“不兼容类型错误”。。。我不知道发生了什么事。“

我的问题很简单,很可笑

如果我创建一个模块,如:

Sub Check_TextBox(ByVal CheckThisBox As TextBox)
'With anything. Even if I leave this blank..
End sub
并尝试在用户窗体上调用它,如:

Private Sub CommandButton1_Click()
Call Check_TextBox(Me.TextBox1)
End Sub

它只是给了我“不兼容类型错误”。。。我不知道发生了什么事。“TextBox1”是一个文本框,我在Sub上声明它是一个文本框。

需要更明确地说明参数类型:

Sub Check_TextBox(CheckThisBox As msforms.TextBox)
    Debug.Print CheckThisBox.Text
End Sub

Me仅在课堂和表格中提供。它在模块中不可用。这确实有效!非常感谢兄弟。这很有趣,因为我有一个完全相同的sub和一个ComboBox,并且可以很好地使用它。在此之前,没有必要使用“msforms”。