VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2002/09/09(Mon) 10:17
投稿者よねKEN
Eメール
URL
タイトルRe^6: ループについて

>  For v = 1 To 4        
>    For 日2 = 日 To 日 + 7 Step 1
>    If 日2 > CStr(日 + 7) Then Exit For

For〜Next内で日2が日+7より大きくなることはありませんので、
この1行は意味がありません。

>        If Len(MyFile2) > 1 Then

最初の質問には、この条件が成り立ったときにFor〜Nextを抜けたいとありますが・・・。

>   next
>  next
>
> この処理で、if条件が成立したらfor文から抜け、日2が1週間過ぎたら
> for文を抜ける処理は、これでいいのでしょうか?

内側のFor文自体が日2が日+7までしか処理しませんので、
日2が一週間すぎたらループ終了というのは、内側のFor文の条件がそれに該当するのでは?

> どうも、ファイルが見つかってもまたfor文に入ってしまいます。
> 教えてくださいっ

何のために外側のFor文があるのかがわかりませんが、
内側のFor文をExit Forで抜けても、外側のループが続けられます。

つまり、最初はv=1の状態で、日2が日〜(日+7)の間処理されます。
MyFile2という変数のサイズが1より大きければ(2以上なら)、この内側のFor文を抜けます。
続いて、v=2の状態で、日2が日〜(日+7)の間処理されます。
MyFile2という変数のサイズが1より大きければ(2以上なら)、この内側のFor文を抜けます。

以降v= 4になるまで繰り返しです。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -