要素の数 繰り返し処理
繰返し制御文 |
---|
For Next |
For Next 入れ子 |
For Step Next |
For Each Next |
Exit For 強制終了 |
Do While Loop |
Do Until Loop |
Do Loop While |
Do Loop Until |
Exit Do 強制終了 |
For Eachは、特に要素グループのメンバー数が不定の時にはとても便利です。
In で指定した配列などの要素グループのすべての要素について、もれなく For Each の次行から Next 間での処理を実行してくれます。要素のデータ型は、要素グループのデータ型に揃えます。
For Each 要素 As データ型 In 要素グループ .......... ....... .......... Next
For Each…Next の使い方は、サンプルプログラムを参考にしてください。
合計値を求めるサンプルプログラム
For Each … Next を使って、配列要素の合計値を求めるサンプルプログラムを作成します。
配列の詳細については、
を参考にしてください。
ソースリストの枠内をクリックすると全選択できます。
Module Module1 Sub Main() ' 配列変数の宣言 Dim arryTensuu() As Integer = {85, 80, 90, 75, 60} ' 変数の宣言 Dim sum As Integer = 0 ' For Each Next を使って配列の合計を求める For Each tensuu As Integer In arryTensuu Console.WriteLine(tensuu & "を加算") ' 前回までの合計値に加える sum = sum + tensuu Next ' 合計を表示 Console.WriteLine() ' 改行 Console.Write("合計は、") Console.Write(sum) Console.Write(" です") Console.WriteLine() ' 改行 End Sub End Module
次回は、Exit For について学習します。
次回: Exit For |
---|