Vb.net-nested-loops

VB.Net-ネストされたループ

VB.Netでは、1つのループを別のループ内で使用できます。 次のセクションでは、概念を説明するためのいくつかの例を示します。

構文

VB.Netの*ネストされたForループ*ステートメントの構文は次のとおりです-

For counter1 [ As datatype1 ] = start1 To end1 [ Step step1 ]
   For counter2 [ As datatype2 ] = start2 To end2 [ Step step2 ]
      ...
   Next [ counter2 ]
Next [ counter 1]

VB.Netの*ネストされたWhileループ*ステートメントの構文は次のとおりです-

While condition1
   While condition2
      ...
   End While
End While

VB.Netの*ネストされたDo …​ While loop *ステートメントの構文は次のとおりです-

Do { While | Until } condition1
   Do { While | Until } condition2
      ...
   Loop
Loop

ループの入れ子に関する最後の注意点は、他の種類のループの中に任意の種類のループを配置できることです。 たとえば、forループはwhileループ内に配置することも、その逆にすることもできます。

例

次のプログラムは、ネストされたforループを使用して、2から100までの素数を見つけます-

Module loops
   Sub Main()
      ' local variable definition
      Dim i, j As Integer
      For i = 2 To 100
         For j = 2 To i
            ' if factor found, not prime
            If ((i Mod j) = 0) Then
               Exit For
            End If
         Next j
            If (j > (i \ j)) Then
               Console.WriteLine("{0} is prime", i)
            End If
         Next i
      Console.ReadLine()
   End Sub
End Module

上記のコードをコンパイルして実行すると、次の結果が生成されます-

2 is prime
3 is prime
5 is prime
7 is prime
11 is prime
13 is prime
17 is prime
19 is prime
23 is prime
29 is prime
31 is prime
37 is prime
41 is prime
43 is prime
47 is prime
53 is prime
59 is prime
61 is prime
67 is prime
71 is prime
73 is prime
79 is prime
83 is prime
89 is prime
97 is prime