VBScript のステートメント、While ... Wend ステートメント

While Null
  MsgBox "foo"
Wend

x = 0
While x < 1
  MsgBox x & " : " & "bar"
  x = x + 1
Wend

• Exit するのはないの？