VBScript教程之三（操作符）

文件:	Operator.zip
大小:	0KB
下载:	下载

'1.数学操作符号
Dim intA,intB
Dim intResult

Wscript.echo "Arithmetic"
intA = 10
intB = 3
'加法
intResult = intA + intB
Wscript.echo intResult
'减法
intResult = intA - intB
Wscript.echo intResult
'乘法
intResult = intA * intB
Wscript.echo intResult
'浮点除法
intResult = intA / intB
Wscript.echo intResult
'整数除法
intResult = intA \ intB
Wscript.echo intResult
'求余
intResult = intA Mod intB
Wscript.echo intResult

'2.比较运算符
Wscript.echo "Comparion"
intA = 10
intB = 3

If intA > intB then Wscript.echo "intA > intB"
If intB < intA Then Wscript.echo "intB < intA"
If intA = intA Then Wscript.echo "intA = intA"
If intA >= intB Then Wscript.echo "intA >= intB"
If intA <= intA Then Wscript.echo "intA <= intA"
If intA <> intB Then Wscript.echo "intA <> intB"

'3.逻辑操作符
Wscript.echo "Logical"
intA = 10
intB = 3

If Not intA > intB then Wscript.echo "Not intA > intB"
If intB < intA And intA > 5 Then Wscript.echo "intB < intA And intA > 5 "
If intA = intA Or IntA < 0 Then Wscript.echo "intA = intA"
If intA >= intB Xor intA < 0 Then Wscript.echo "intA >= intB Xor intA < 0"
If intA Eqv intA Then Wscript.echo "intA Eqv intA"
If intA Imp intB Then Wscript.echo "intA Imp intB"