while文の使い方

Question

初めまして。プログラミング初心者です。
Visual StudioでWindows Formsを作成しています。
とある課題で、１～９の数字ボタンと読み上げボタンがあり、数字ボタンがそれぞれ押下されたら何らかの形で内容を保存しておき、最後に読み上げボタンを押下したらメッセージで押された順番に表示するという課題に取り組んでいます。
for文とListを使用しては出来たのですが、While文でやってほしいと指摘されたのでWhile文でのやり方がよくわからないので困っています。お願いします。

Private num As Integer = 0
Private btn() As Integer

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ReDim Preserve btn(num + 1)
    btn(num) = 1
    num = num + 1

End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    ReDim Preserve btn(num + 1)
    btn(num) = 2
    num = num + 1
End Sub

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    ReDim Preserve btn(num + 1)
    btn(num) = 3
    num = num + 1
End Sub

.
.
.
.
'読み上げボタン
Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
Dim msg As String = ""
Dim count As Integer = 1
For i = 0 To num - 1 Step +1
msg = (count & "回目:" & btn(i) & "が押されました。" & vbCrLf)
MsgBox(msg)
count += 1
Next

End Sub

End Class

Comments

[退会済みユーザー]

何を作っているか（Windows Forms? WPF? ASP.NET Web Forms? その他？）ぐらいは書きませんか？

[reeeo]

申し訳ございません。Windows Formsです。

[takito]

While文の使い方を習っていないのでしょうか？それとも、習ったけど理解できていないのでしょうか？そもそもFor文を誰かに説明できる程度に理解していますか？

Answer 1

For構文は、以下のような構造をしています。

For ループ関数 = ループ関数の初期値 To ループの終了条件(最後のループのループ関数の値) Step ループ関数の増分
  'ここに、ループで繰り返し実行されるコードを書く
Next

それに対して、While構文は以下のような構造になります。

ループ関数 = ループ関数の初期値
While ループの継続条件
  'ここに、ループで繰り返し実行されるコードを書く
   ループ関数 = ループ関数 + ループ関数の増分
End While

違いは、次の2点です。

1. ループ関数に増分を加えるコードを書かないといけない (For文だとStepで増分を書くだけで、増分が1ならStep以下を省略できる）。
2. While文は判定式（結果が、TrueかFalseになる式）を書かないといけない(For文ならToの後に値を書くだけだが)。

質問のコードをFor構文の部分

For i = 0 To num - 1 Step +1
msg = (count & "回目:" & btn(i) & "が押されました。" & vbCrLf)
MsgBox(msg)
count += 1
Next

をWhile構文で書き換えてみると

i = 0
while (i < num)  '判りやすいように条件式を括弧でくくりました。括弧は無くてもOKです。
  msg = (count & "回目:" & btn(i) & "が押されました。" & vbCrLf)
  MsgBox(msg)
  i += 1
End While

となります。

"count += 1"の行は、ループ関数を増やそうとした名残だと思われますが、変数countが使われるところが無いので削りました。

Comments

[reeeo]

詳しくありがとうございました！とても参考になりました。

Answer 2

別に無理にwhile使わなくていいと思うのですが・・・（個人的には配列の拡張の方が気になる）
まぁ、なんらかの意図があるので答えは控えますので、リファレンスの場所を・・・

とくに難しくないです。
終了条件（継続条件）の修正と、stepの部分を自前で計算すればいいです。

forループ
whileループ

あ、回答でてましたね。

Comments

[reeeo]

解決しました。ありがとうございました。