Question

我正在尝试使取消功能适用于我的数组它适用于一个简单的输入框但是数组（InputBox（不太喜欢它。

工作代码。

If strVarValue = vbNullString Then
    MsgBox ("User canceled!")
    WScript.Quit
End If

我需要帮助

strIPAddress = Array(InputBox("IP address"))
If strIPAddress = vbNullString Then
    MsgBox ("User canceled!")
    WScript.Quit
End If

不喜欢数组因此导致我的类型不匹配。

Answer 1

仅在用户未按“取消”时进行转换：

userInput = InputBox("IP address")
If userInput = "" Then
    MsgBox ("User canceled!")
    WScript.Quit
End If

strIPAddress = Array(userInput)

此外，如果您想区分“用户按下取消”和“用户按下确定而不输入值”，您需要检查变量是否为Empty：

userInput = InputBox("IP address")
If IsEmpty(userInput) Then
    MsgBox ("User canceled!")
    WScript.Quit
ElseIf userInput = "" Then
    MsgBox ("Missing input!")
    WScript.Quit 1
End If

strIPAddress = Array(userInput)

取消数组输入框

1 个答案: