; Использование массива
Local $aArray[4]

$aArray[0] = "a"
$aArray[1] = 0
$aArray[2] = 1.3434
$aArray[3] = "test"

$sString = ""
For $vElement In $aArray
	$sString &= $vElement & @CRLF
Next

MsgBox(0, "For...In...Next, массив", "Результат: " & @CRLF & $sString)

; Использование объекта
$oShell = ObjCreate("shell.application")
$oShellWindows = $oShell.windows

If IsObj($oShellWindows) Then
	$sString = ""

	For $Window In $oShellWindows
		$string = $sString & $Window.LocationName & @CRLF
	Next

	MsgBox(4096, "", "Открыты следующие окна:" & @CRLF & $sString)
Else
	MsgBox(4096, "", "Не открыто никаких окон :(.")
EndIf