下記のような例文がありますが、 Do While (1)の括弧1の意味がわかりません。
Stri = ""
iCount = 3 '入力データ開始行
Do While (1)
If Trim(Sheets("テスト").Range("A" & iCount)) = "" Then
Exit Do
End If
Stri = Stri & Sheets("テスト").Range("G" & iCount) & ","
iCount = iCount + 1
Loop
以下のような使い方ならわかるのですが・・・・。
Do While Counter < 20
Counter = Counter + 1
MsgBox Counter
Loop
No.1ベストアンサー
- 回答日時:
つまり「ずっとループ」ってことです。
ループの入り口や出口で継続判断をせず、ループ内で判断をする場合の方法です。
単純に
Do
' ループ内の処理
Loop
とも書けますが、ループ処理のコードが長い場合、一度に Do と Loop を見渡すことが出来ませんので、Do の行を見ただけで「終了判断は中でやってるんだろうな」と理解できるように Do の行で意味のない (1) を書いています。
No.4
- 回答日時:
s_husky です。
回答にミスが!For-Next文です。
No.3
- 回答日時:
Do While (条件) - Loop文 は、()内の条件をテストした結果が真であれば処理を繰り返します。
通常は、条件=条件式です。
よって、処理後に行われるテストで、いずれ真から偽へと変化しループを終了します。
(1)と書けば、1=真という約束事ですから、永遠に偽にはなりません。
無限ループする理由です。
さて、Do While (条件) - Loop文は、For Next-End文に置き換えることが可能です。
For I = 3 To 9999
If Trim(Sheets("テスト").Range("A" & iCount)) = "" Then
Exit Do
End If
・・・・・
Next I
この場合、For のループ回数は便宜上 9999 としていますが、実際は未定です。
よって、カウントすべき行が無くなった時点で For ループを抜けています。
このように、どうせループを抜け出す判定を組み込むならば For文は無限ループしても良い訳です。
ところが、For文には無限ループを指定することができません。
ならば、Do While (条件) - Loop文を使おうということでしょう。
> For文には無限ループを指定することができません。
> ならば、Do While (条件) - Loop文を使おうということでしょう。
ははぁ~ん!よ~くわかりました。
有難うございます。
No.2
- 回答日時:
>括弧1の意味がわかりません。
「常に真(TRUE)」です。
このプログラムでは Exit Do でループから抜けることを前提にしていて Exit Do が実行されない場合には無限にループが続きます。
ちなみに、もし無限ループ状態になってプログラムが止まらなくなっても Ctrl + Break のキー操作で強制終了できます。
なあるほど、常に真(TRUE)ですか。
ためにしにDo While (0)でやってみました。案の定回りません。
こういう書き方もあるんですね、勉強になりました。
有難うございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ハマっている「お菓子」を教えて!
この世には、おいしいお菓子がありすぎて……。 次何を食べたらいいか迷っています。 みなさんが今、ハマっている「お菓子」を教えてください!
-
人生最悪の忘れ物
今までの人生での「最悪の忘れ物」を教えてください。 私の「最悪の忘れ物」は「財布」です。
-
メモのコツを教えてください!
メモを取るのが苦手です。 急いでメモすると内容がごちゃごちゃになってしまったり、ひどいときには全く読めない時もあります。
-
昨日見た夢を教えて下さい
たまにすごいドラマチックな夢見ること、ありませんか? 起きてからも妙に記憶に残っているような、そんな夢。
-
14歳の自分に衝撃の事実を告げてください
タイムマシンで14歳の自分のところに現れた未来のあなた。 衝撃的な事実を告げて自分に驚かせるとしたら何を告げますか?
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
while doについて
-
エクセルVBAで Do While (1)って?
-
For文の終了値を関数にしても問...
-
opencvの静止画保存について
-
UWSCにてある一定の動作を無限...
-
for文while文の無限ループの違...
-
このC#プログラムの1〜11を埋め...
-
ループについて
-
入力した文字列から母音だけを...
-
信頼区間の1.96や1.65ってどこ...
-
Enterキーを押されたら次の処理...
-
2÷3などの余りについて
-
プログラミング初心者です。 Py...
-
C言語を実行すると-infが出てき...
-
プログラムでの数字につく”f”の...
-
マイナスからプラスへ転じた時...
-
C言語での引数の省略方法
-
プログラミングで二番目に大き...
-
分数の足し算をさせるプログラ...
-
if と配列の組み合わせ
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ループを途中で抜けたいのですが。
-
do-while文が禁止される理由
-
break文でループを一気に抜ける...
-
For文の終了値を関数にしても問...
-
UWSCにてある一定の動作を無限...
-
エクセルVBAで Do While (1)って?
-
入力した文字列から母音だけを...
-
入力した数値を倍々するプログラム
-
PIC のプログラムについて ど...
-
放電現象の2分法C言語プログラ...
-
C言語forループが完結した場合...
-
Delphiで・・・
-
While文の終わりにセミコロンが...
-
他言語で言うcontinue文
-
n重のfor文にするには?
-
フラッシュ暗算
-
for文while文の無限ループの違...
-
ループの特定入力終了
-
PAD図の書き方
-
Excel VBAで年度をまたぐ期間の...
おすすめ情報