$var = 20
If $var > 10 Then
MsgBox(0, "示例", $var & " 果真大于 10!^_^")
Else
MsgBox(0, "示例", $var & " 居然小于 10!?-_-!")
EndIf
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$var = 30
Select
Case $var > 1 AND $var <= 10
MsgBox(0, "示例", "$var 大于 1")
Case $var > 10 AND $var <= 20
MsgBox(0, "示例", "$var 大于 10")
Case $var > 20 AND $var <= 30
MsgBox(0, "示例", "$var 大于 20")
Case $var > 30 AND $var <= 40
MsgBox(0, "示例", "$var 大于 30")
Case $var > 40
MsgBox(0, "示例", "$var 大于 40")
EndSelect
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
For $i = 5 to 1 Step -1
MsgBox(0, "倒数", $i)
Next
MsgBox(0,"", "循环结束")
;;;;;;;;;;;;;;;;;;;;;
$i = 0
While $i <= 10
MsgBox(0, "目前变量 $i 的值是:", $i)
$i = $i + 1
WEnd
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$i = 0
Do
MsgBox(0, "目前变量 $i 的值是: ", $i)
$i = $i + 1
Until $i = 10
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; 带有三个自定义函数的示例脚本
; 请注意变量的使用,ByRef传递 以及 返回值(Return)的用法
$foo = 2
$bar = 5
msgBox(0,"今天是 " & today(), "$foo 等于 " & $foo)
swap($foo, $bar)
msgBox(0,"在变量 $foo 和 $bar 交换之后", "现在 $foo 的值是: " & $foo)
msgBox(0,"最后", "3 和 4 中较大的数是: " & max(3,4))
Exit
Func swap(ByRef $a, ByRef $b) ;交换两个变量的内容
Local $t
$t = $a
$a = $b
$b = $t
EndFunc
Func today() ;以 mm/dd/yyyy 的形式返回当前日期
return (@MON & "/" & @MDAY & "/" & @YEAR)
EndFunc
Func max($x, $y) ;返回两个数中的较大值
If $x > $y Then
return $x
Else
return $y
EndIf
EndFunc
;示例脚本结束
;;;;;;;;;;;;;;;;;;;;;;;;;
;下面是一个示例函数,该函数的功能是获得某个数的10倍是多少:
$val = 10
For $i = 1 To 10
$doubled = MyDouble($val)
MsgBox(0, "", $val & " 的两倍是 " & $doubled)
$val = $doubled
Next
Exit
Func MyDouble($value)
$value = $value * 2
Return $value
EndFunc
;;;;;;;;;;;;;;;;
注释
#comments-start
MsgBox(4096, "", "这一行语句不会执行")
MsgBox(4096, "", "同上")
#comments-end
;;; #cs
MsgBox(4096, "", "因为 '#cs' 已被注释掉,因此弹出此对话框。")
#ce