• FOR EACH

FOR EACH Variable IN Expression ... NEXT

オブジェクトを列挙しながらループを繰り返します。
式は、列挙型オブジェクトへの参照（コレクション、配列など）である必要があります。
ループ変数は、ローカル変数または現在の関数の引数でなければなりません。

Loop variable declaration

 Since 3.12

ループ変数は、その構文に従って直接宣言できます。

FOR EACH Variable AS Datatype IN Expression ... NEXT

 

ループ変数の範囲は、まだ関数全体です。 つまり、ループ変数をそのように宣言することは、関数の先頭で宣言するのと同じ効果がありますが、宣言の後でしか使用できないという点が異なります。

宣言が同じであれば、必要なだけ同じループ変数を宣言できます。

Example

Dim Dict As New Collection
Dim Element As String

Dict["Blue"] = 3
Dict["Red"] = 1
Dict["Green"] = 2

For Each Element In Dict
Print Element;;
Next

3 1 2

 

Or

Dim Dict As New Collection

Dict["Blue"] = 3
Dict["Red"] = 1
Dict["Green"] = 2

For Each Element As String In Dict
Print Element;;
Next

3 1 2

• FOR EACH (2)

FOR EACH Expression ... NEXT

この構文は、Expressionが実際のコンテナではない列挙可能なオブジェクトである場合に使用する必要があります。たとえば、データベースクエリの結果です。

Example

Dim Res As Result

Res = DB.Exec("SELECT * FROM MyTable")

For Each Res
Print Res!Code; " "; Res!Name
Nex

 

列挙の順序は必ずしも予測可能ではありません。 詳細については、各列挙可能クラスのドキュメントを参照してください。

See also

• Loop Control Structures

• Native Container Classes