VBScript比较运算符无法正常工作？

Question

我觉得这是一个非常明显的错误，但我真的无法弄明白。似乎VBScript中的比较运算符无法正常工作。我正在编写一个用户输入订单金额的程序，并将此金额与1000进行比较。如果我为订单金额输入200，则程序输出200＆gt; 1000 =真。

以下是我的程序的代码：

largeOrderAmt = 1000
orderAmt = Inputbox("What is the order amount?")
Document.write(orderAmt & largeOrderAmt & (orderAmt > largeOrderAmt))

'Calculations
If orderAmt <= largeOrderAmt then
 Document.write ("if statement called <br>")
...
Else
 Document.write ("else statement called <br>")
EndIf

这是输出： 200 1000True else语句叫

我真的不明白。这非常令人沮丧。任何帮助将不胜感激，谢谢！

Answer 1

那是因为这些值被比较为字符串：

"200" > "1000" = True

使用CInt或CDbl将输入转换为数字，例如：

orderAmt = CDbl(Inputbox("What is the order amount?"))