Do While Loop 繰り返し [VB]

Visual Basic 文法[2015 2013 2012]

条件を満たしている限りループ

Do While Loop は、繰り返し条件を先に判定して、条件を満たしていれば、繰り返し処理を実行します。

繰り返し回数が事前に分からない場合に、Do While Loopループが使えます。

繰返し回数が事前に分かっている場合には、通常 For Step Next のほうが便利です。

Do While Loopは、次のような構文になります。

  Do While 条件式
    ............
    .........
    ............
  Loop

Do While Loop 条件式

条件式には、条件を満たしているか、そうでないかを判定する式を書きます。条件式によく使う比較演算子を表にまとめました。

比較演算子の使い方
< Do While a < b 変数aが変数bより小さければ、Do While 条件式 ... Loopを実行
<= Do While a <= b 変数aが変数b以下ならば、Do While 条件式 ... Loopを実行
> Do While a > b 変数aが変数bより大きければ、Do While 条件式 ... Loopを実行
>= Do While a >= b 変数aが変数b以上ならば、Do While 条件式 ... Loopを実行
= Do While a = b 変数aが変数bと同じならば、Do While 条件式 ... Loopを実行
<> Do While a <> b 変数aと変数bが異なれば、Do While 条件式 ... Loopを実行
  Do While sum <= 100
    ............
    .........
    sum = sum + inNum
  Loop

Do While Loop サンプルプログラム

Do While Loop を使って、キーボードから入力した数値の合計が100を超えるまで、入力を受付けるプログラムを作成します。

キーボードから整数値を入力について はこちら

ソースリストの枠内をクリックすると全選択できます。

Module Module1

  Sub Main()
      ' 変数の宣言
      Dim inStr As String = ""
      Dim inNum As Integer = 0
      Dim sum As Integer = 0

      ' 入力値の和が100以下ならば入力を続ける
      Do While sum <= 100
          Console.WriteLine("整数を入力してください")
          ' キーボードから入力
          inStr = Console.ReadLine()
          ' 入力した文字列を整数に変換
          inNum = Integer.Parse(inStr)
          ' 入力値を加算
          sum = sum + inNum
      Loop

      ' 合計値を表示
      Console.WriteLine()    ' 改行
      Console.WriteLine("お疲れ様でした")
      Console.WriteLine("入力した数値の和は")
      Console.WriteLine(sum)
      Console.WriteLine("です")
  End Sub

End Module

sum <= 100 で条件を判定しています。合計値sumが100以下なら、 DoWhile sum <= 100 の次行から Loop の間の処理が、繰り返し実行されます。

たとえば、最初に150を入力すると、その1回のみで、sumが100を超えるので、すぐに Loop の次に処理が移ります。合計値は 0 のままです。

[広告]と関連コンテンツ
[広告]