vbscript - 在vbscript中除以零

Question

我正在尝试运行一个脚本，其中除以零会导致错误。运行脚本后，发现 x 除以 0 的输入框被系统接受并导致运行时错误，指向以下行：

    calculator = x / x1

标签： vbscript

Answer 1

可能您打算使用此代码来保护您免受“除以 0”错误的影响：

ElseIf num2 = x Then
msgbox "Error, cannot divide any number to 0"

但是这段代码永远不会被执行，因为之前你有If IsNumeric(num2) Then Exit do当用户输入 0 时退出 Do 循环的代码。

此外，您必须仅为“DIVIDE”操作执行该代码。

即，您的代码在调用之前应包含以下内容calculator：

If num2 = 0 And (LCase(operation) = "divide") Then
    msgbox "Division by zero!"
    WScript.Quit
End If