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 '合計格納用
  5.  '条件を指定してループする
  6.  While num <= 5
  7.   'カウンターを加算する
  8.   sum += num
  9.   'カウンターを1加算する
  10.   num += 1
  11.  End While
  12.  '結果を表示
  13.  Console.WriteLine("合計:" & sum)
  14.  Console.ReadLine()
  15. End Sub

○ フローチャート


○ 実行結果

合計:15

○ 解説

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

前へ   次へ