今回はVBScriptで繰り返しを使用する方法をご紹介します。

ループの種類

Do…Loop ステートメント
While…Wend ステートメント
For…Next ステートメント
For Each…Next ステートメント

Do…Loop

Do While 条件
処理N
Loop

Do Until 条件
処理N
Loop

whileとUntilの違いは、Whileは条件が真の間ループで、Untilは条件が偽の間ループです。

'1～10まで表示するサンプル
'whileでの実装
Dim val
val =0
Do While val <10
        val = val + 1
        MsgBox val
Loop

'1～10まで表示するサンプル
'Untilでの実装
Dim val
val =0
Do Until val > 10
        val = val + 1
        MsgBox val
Loop

途中でループから抜けたい場合は、Exit Doと書きます。

'1～10まで表示するサンプル
'無限ループからの脱出
Dim val
val =0
Do While 1 = 1
        If val = 10 Then
        	Exit Do
        End If
        val = val + 1
        MsgBox val
Loop

Pocket