10、VBScript 数据收集、通知与错误报告详解

VBScript 数据收集、通知与错误报告详解

1. 输入验证与类型不匹配错误

在 VBScript 中，当需要用户输入特定范围的值时，可使用 InputBox() 函数。例如，提示用户输入 0 到 9 之间的值：

Dim intAnswer
intAnswer = InputBox("Enter the number between 0 and 9", "Menu List")

为确保用户输入的是数字而非字母或特殊字符，可使用 IsNumeric() 函数进行验证。若输入为数字，该函数返回 True ，此时可使用 CInt() 函数将输入值显式转换为整数类型，虽非必需，但能让代码意图更清晰。示例如下：

If IsNumeric(intAnswer) Then
    intAnswer = CInt(intAnswer)
    If intAnswer >= 0 And intAnswer <= 9 Then
        MsgBox "You entered " & intAnswer
    Else
        MsgBox "Invalid selection!"
    End If
Else
    MsgBox "Invalid non-number"
End If

若 VBScript 对变量执行其数据类型不支