While文

　While文は、条件を指定して条件が真の間、繰り返し処理をします。ある条件を比較した結果により、繰り返し処理をするか、しないかを決定します。回数を指定する方法や、集合をループ(繰り返す)する方法と違って、繰り返し処理を抜け出るような記述をしないと、永遠にループ(無限ループ)するので、注意します。

While文の書式
While 継続条件式
　処理
End While

While文
While文

○　プロジェクト

次のようにプロジェクトを作成してください。実行するとコンソールに結果が表示されます。

プロジェクトの種類 コンソール アプリケーション
プロジェクト名 WhileTest

サンプルダウンロード

○　プログラム

　次のようにプログラムを入力してください。

  1. Sub Main()
  2. 　'変数の宣言
  3. 　Dim num As Integer = 1 'カウンター用
  4. 　Dim sum As Integer = 0 '合計格納用
  6. 　'条件を指定してループする
  7. 　While num <= 5
  8. 　　'カウンターを加算する
  9. 　　sum += num
  11. 　　'カウンターを1加算する
  12. 　　num += 1
  13. 　End While
  14. 　'結果を表示
  15. 　Console.WriteLine("合計:" & sum)
  16. 　Console.ReadLine()
  17. End Sub

○　実行結果

合計:15

○　解説

　5行目で用意した変数numは、繰り返すたび増やして使うカウンターです。6行目で用意した変数sumは合計を保存します。9行目から繰り返し処理が記述されています。条件としてカウンター変数numが5以下の間繰り返します。11行目でカウンター変数numの値を変数sumに足しこみます。そして、14行目でカウンター変数を1増やします。これを繰り返し条件が合わなくなるまで繰り返します。繰り返し処理が終了したのち、18行目で合計した結果を表示しています。このサンプルは「1 + 2 + 3 + 4 + 5」を計算したのと同じ結果となります。

前へ   次へ