Do While Loopと同じ感じでTrueの間繰り返し
While の後の式がTrueの間繰り返され、FalseになるとWendの次のステートメントから実行される
ふとこんな書き方もあるんだなあ~と思ったので動画にしてみた
ｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰ
実際に使用したサンプルコード
Option Explicit
Public Sub sample()
Dim x As Integer
x = 0
'xが５より小さい間
While x < 5
x = x + 1
Wend
MsgBox "終わり"
End Sub
simple
