VBScriptループ
ループステートメント
ループステートメントは、同じコードブロックを指定された回数実行するために使用されます。
VBScriptには、次の4つのループステートメントがあります。
- For ... Nextステートメント-指定された回数だけコードを実行します
- For Each ... Nextステートメント-コレクション内の各アイテムまたは配列の各要素のコードを実行します
- Do ... Loopステートメント-条件が真である間または真になるまでループします
- While ... Wendステートメント-使用しないでください-代わりにDo ... Loopステートメントを使用してください
For ...次のループ
For ... Nextステートメントを使用して、コードのブロックを指定された回数実行します。
Forステートメントは、カウンター変数（i）とその開始値と終了値を指定します。Nextステートメントは、カウンター変数（i ）を1つ増やします。
例
<html>
<body>
<%
For i = 0 To 5
response.write("The number is " & i & "<br />")
Next
%>
</body>
</html>
ステップキーワード
Stepキーワードを使用すると、指定した値だけカウンター変数を増減できます。
以下の例では、ループが繰り返されるたびに、カウンター変数（i）が2ずつ増加します。
For i=2 To 10 Step 2
some code
Next
カウンター変数を減らすには、負のステップ値を使用する必要があります。開始値よりも小さい終了値を指定する必要があります。
以下の例では、ループが繰り返されるたびに、カウンター変数（i）が2ずつ減少します。
For i=10 To 2 Step -2
some code
Next
For ... Nextを終了します
ExitForキーワードを使用してFor ... Nextステートメントを終了できます。
For i=1 To 10
If i=5 Then Exit For
some code
Next
それぞれについて...次のループ
For Each ... Nextループは、コレクション内の各アイテム、または配列の各要素に対してコードのブロックを繰り返します。
例
<html>
<body>
<%
Dim cars(2)
cars(0)="Volvo"
cars(1)="Saab"
cars(2)="BMW"
For Each x In cars
response.write(x & "<br />")
Next
%>
</body>
</html>
やる...ループ
繰り返し回数がわからない場合は、Do ... Loopステートメントを使用してください。
Do ... Loopステートメントは、条件が真である間、または条件が真になるまで、コードのブロックを繰り返します。
条件が真の間にコードを繰り返す
Whileキーワードを使用して、Do ... Loopステートメントの条件を確認します。
Do While i>10
some code
Loop
iが9の場合、上記のループ内のコードは実行されません。
Do
some code
Loop While i>10
このループ内のコードは、 iが10未満であっても、少なくとも1回は実行されます。
条件が真になるまでコードを繰り返す
untilキーワードを使用して、Do ... Loopステートメントの条件を確認します。
Do Until i=10
some code
Loop
iが10の 場合、ループ内のコードは実行されません。
Do
some code
Loop Until i=10
このループ内のコードは、 iが10に等しい場合でも、少なくとも1回は実行されます。
Do ... Loopを終了します
ExitDoキーワードを使用してDo ... Loopステートメントを終了できます。
Do Until i=10
i=i-1
If i<10 Then Exit Do
Loop
このループ内のコードは、iが10と異なる限り、およびiが10より大きい限り実行されます。
その他の例
をループするhtmlの6つの見出しをループする方法。
単純なDo ... Whileループの作成方法。