我在表单中使用了一个输入框。
如果我按OK,代码就可以了。 当我按下取消程序显示错误。我应该做什么?
答案 0 :(得分:3)
你应该寻找一个空字符串
Dim MyString As String
MyString = InputBox("Please enter something", "Request Info", Nothing)
If (MyString Is Nothing OrElse MyString = "") Then
'User hit cancel
Else
'Read MyString
End If
答案 1 :(得分:1)
请参阅工作样本的文档:
<强>
Interaction.InputBox
Method 强>
答案 2 :(得分:1)
更改InputBox
之后的代码以支持空字符串。如果您取消,InputBox
将返回一个空字符串,因此错误原因必须是您的代码希望字符串具有长度&gt; 0
如果您编辑问题以显示调用InputBox
的代码以及该行后面的几行,则有人可能会指出确切的错误。