VBA - (Excel)为什么我不能在没有出现类型不匹配错误的情况下为Userform设置文本框类型?

时间:2015-07-24 21:03:15

标签: vba textbox userform

我有一个Userform,这是我的控制按钮的代码。尝试使用以下代码将文本框传递给函数

Private Sub pdclear_Click()
Dim textinput As TextBox
Set textinput = frmBigInputBox
Call clear(textinput)
End Sub

调试模式中以黄色突出显示的行是

Set textinput = frmBigInputBox

为什么会导致“13类型不匹配”错误?我做错了什么?

2 个答案:

答案 0 :(得分:2)

尝试使用MSForms.TextBox。如在

Dim textinput As MSForms.TextBox

适合我。

答案 1 :(得分:1)

我可以重现错误并找到:http://forums.devx.com/showthread.php?168758-Excel-VBA-Using-TypeOf

所以你必须将其定义为MSForms.TextBox,似乎。