枚举对象集合或数组的元素
For <变量> In
<表达式>
语句
...
Next
变量 | 已赋值的元素 |
表达式 | 描述对象的表达式, 或是至少是有一个元素的数组 |
;Using an Array
Local $aArray[4]
$aArray[0]
= "a"
$aArray[1]
= 0
$aArray[2]
= 1.3434
$aArray[3]
= "测试"
Local $string
= ""
For $element
In $aArray
$string = $string & $element & @CRLF
Next
MsgBox(0, "For..IN
数组测试", "结果:
" & @CRLF & $string)
;使用对象集合
Local $oShell
= ObjCreate("shell.application")
Local $oShellWindows = $oShell.windows
If IsObj($oShellWindows) Then
$string = ""
For
$Window In
$oShellWindows
$string = $string & $Window.LocationName &
@CRLF
Next
MsgBox(0, "", "您有以下窗口被打开:" & @CRLF & $string)
Else
MsgBox(0, "", "你没有打开的
shell 窗口.")
EndIf
provider with jb51.net (unicode) |