Ve VB.NET, Pro každou smyčku se používá k iteraci bloku příkazů v objektech pole nebo kolekce. Pomocí smyčky For Each můžeme snadno pracovat s objekty kolekce, jako jsou seznamy, pole atd., a spustit každý prvek pole nebo kolekce. A když je iterace přes každý prvek v poli nebo kolekci dokončena, ovládací prvek se přenese na další příkaz, aby se cyklus ukončil.

Syntax:

aktuální datum v jazyce Java

 For Each var_name As [ DataType ] In Collection_Object [ Statements to be executed] Next 

Pro každou smyčku se používá ke čtení každého prvku z objektu kolekce nebo pole. The Datový typ představuje typ proměnné a var_name je název proměnné pro přístup k prvkům z pole nebo sbírkový předmět takže jej lze použít v těle smyčky For Each.

Vývojový diagram pro každou smyčku

Následující vývojový diagram představuje fungování smyčky For Each Next pro iteraci prvků pole v Programovací jazyk VB.NET .

Prvním krokem je inicializace pole nebo objekt kolekce pro provedení každého prvku pole pomocí proměnné v Pro každou smyčku. Proměnná se používá ve smyčce For Each ke kontrole, zda je živel je k dispozici nebo není. Pokud je prvek dostupný v objektu kolekce, bude se provádět blok For Each, dokud nebude stav zůstává pravdou. Po provedení každého prvku pole se řízení přenese do příkazu end.

Příklady pro každou smyčku

algoritmus rychlého třídění

Napište jednoduchý program, který pochopí použití smyčky For Each Next ve VB.NET.

For_Each_loop.vb

 Imports System Module For_Each_loop Sub Main() 'declare and initialize an array as integer Dim An_array() As Integer = {1, 2, 3, 4, 5} Dim i As Integer 'Declare i as Integer For Each i In An_array Console.WriteLine(' Value of i is {0}', i) Next Console.WriteLine('Press any key to exit...') Console.ReadLine() End Sub End Module 

Výstup:

f filmy

Ve výše uvedeném příkladu vytvoříme celočíselné pole s názvem Pole () , a Pro každou smyčku se používá k iteraci každého prvku pole pomocí definovaného proměnná 'i' .

Příklad 2: Napište jednoduchý program pro tisk názvů ovoce pomocí smyčky For Each ve VB.NET.

Pro_každý.vb

 Imports System Module For_each Sub Main() 'Define a String array Dim str() As String 'Initialize all element of str() array str = {'Apple', 'Orange', 'Mango', 'PineApple', 'Grapes', 'Banana'} Console.WriteLine('Fruit names are') 'Declare variable name as fruit For Each fruit As String In str Console.WriteLine(fruit) Next Console.WriteLine(' Press any key to exit...') Console.ReadKey() End Sub End Module 

Výstup:

V tomto příkladu str() je pole typu String, které definuje různé názvy ovoce. A ovoce je název proměnné, která se používá k iteraci každého prvku str() pole pomocí Pro každého smyčka v programu. Pokud je přečten celý prvek, řízení přejde na Hlavní() funkce pro ukončení programu.