dim a,b
VBSCall a=InputBox("输入启动码"&vbCrLf&"请注意大小写!")
a=cint(a)
b="123456"
If a=b
Goto st
Else
MsgBox "使用码错误!"
EndScript
EndIf
如上,输入123456后,调试说"cint(a)"益处,无法比较a、b
dim a,b
VBSCall a=InputBox("输入启动码"&vbCrLf&"请注意大小写!")
a=cint(a)
b="123456"
If a=b
Goto st
Else
MsgBox "使用码错误!"
EndScript
EndIf
如上,输入123456后,调试说"cint(a)"益处,无法比较a、b