VB.NET While文の使い方 繰り返し処理

今回は、同じような処理を何回もやる場合に重宝する方法があるので、
早速やってみましょう。

1から10までの数を全部足して表示するプログラムを作ってみましょう。

Sub Main()
    Dim a As Integer = 0
    Dim i As Integer = 1

    While i <= 10 
        a = a + i
        i = i + 1
    End While

    Console.WriteLine("1から10の合計は{0}です", a)
End Sub

プログラムを実行すると以下のようになります。

1から10の合計は55です

繰り返し文のWhile(ホワイル)文が登場です。

While i <= 10 
      a = a + i
      i = i + 1
End While

プログラムの流れは、以下のフローチャートで表しました。

上記図のように繰り返し処理が実行されます。

タイトルとURLをコピーしました