投稿日 | : 2006/01/15(Sun) 11:16 |
投稿者 | : Hmk |
Eメール | : |
URL | : |
タイトル | : Re^2: ループ処理について |
> 絶対になりません。
本を読み返して、理解しました。
>
> i の値が 0 だった場合、1 度目のループで 6 になります。
> 次のループの入り口で 5 未満である条件をクリアしないため、
> Do While ブロック内には再入しません。
分かりやすいです。まったくその通りです。
>
> > その場合、msgboxが実行すると出るのですが、ループが終わらないのに
> > 下のコードまで実行されるのでしょうか?
>
> 本当に無限ループであればなりません。
Private Sub Command1_Click()
i = 0
Do While i < 5
i = i + 0
Loop
MsgBox "ループが終わるまで出ないのか?"
End Sub
修正しました。これですと永遠ルールですが実行したら
強制終了になりました。
> 何を検証したかったのかが判りませんが、こういうことです。
Private Sub Command1_Click()でループを続けながらmsgboxを出すのか
ループが終わらない限り、msgboxが出ないのか試したかったのですが
ループを理解できていなかったようです。
補足などあればよろしくお願いします