FOR … IN… NEXT

Chức năng của câu lệnh này là liệt kê các phần tử bên trong một mảng hoặc một tập hợp object (đối tượng) COM (component object model)

Cú pháp

 For  <var>  In  <expression>                  <các câu lệnh>                  ........  Next 

Giải thích

<var>  :  biến sẽ được gán giá trị của từng phần tử trong <expression>

<expression>  :  một đối tượng COM hoặc một mảng có ít nhất một phần tử.

Chú ý

Ø       Nếu <expression> là một tập hợp object không có phần tử, thì đoạn script sẽ bỏ qua việc lặp và <var> sẽ chứa một chuỗi rỗng.

Ø       Nếu <expression> không phải là object, cũng không phải là mảng, thì đoạn script sẽ dừng với một lỗi được thông báo, trừ khi bạn có sử dụng trình điều khiển COM Error.

Ø       Giả sử trường hợp <expression> bạn dùng là một mảng và bạn có thay đổi giá trị của các phần tử trong mảng khi For…In đang chạy, thì giá trị đó sẽ không được ánh xạ ngay vào trong mảng.  Chỉ khi For… In kết thúc thì thay đổi đó mới có hiệu lực.

Ø       Vòng lặp For…In cho phép lồng vào nhau.

Ví dụ 1

 Global $array[4]     $array[0]="w"     $array[1]="x"     $array[2]="y"     $array[3]="z"     For $element In $array         MsgBox(0,"Current $array item",$element)     Next 

Ví dụ 2

Đoạn mã sau sẽ thông báo cho bạn biết các cửa sổ Explorer nào đang mở

$oShell = ObjCreate("shell.application")  $oShellWindows=$oShell.windows     if Isobj($oShellWindows) then    $string=""    for $Window in $oShellWindows      $String = $String & $Window.LocationName & @CRLF  next       msgbox(0,"","You have the following windows open:" & @CRLF & $String)  else    msgbox(0,"","you have no open shell windows.")  endif