Her Biri İçin Nedir?
Her biri için bir Döngü komutudur. Bir koleksiyonda sahip olduğunuz her öğe için bir dizi ifadeyi tekrarlamanız gerektiğinde bu ifadeyi kullanmalısınız. Bir koleksiyon veya dizide bulunan tüm öğeleri işlemek için kullanabilirsiniz.
Bu VB'de. Net öğretici, öğreneceksiniz,
- Her Biri İçin Nedir?
- For Each… Next Sözdizimi
- Örnekler
- Döngüler İçin Yuvalanmış
- Şunun İçin Çık ve Devam Et
For Each… Next Sözdizimi
Her ifade için aşağıda verilen sözdizimi kullanılır:
For Each item [ As data_type ] In group[ statement(s) ][ Continue For ][ statement(s) ][ Exit For ][ statement(s) ]Next [ item ]
Buraya,
- Öğe, koleksiyonun tüm öğelerini yinelemek için kullanılacak değişkendir. Her ifade için gerekli, ancak Sonraki ifadede isteğe bağlıdır.
- Veri_türü, elemanın veri türüdür. Ürün beyan edilmemişse gereklidir.
- Grup, üzerinde ifadelerin tekrarlanacağı koleksiyondur. Gereklidir.
- İfadeler isteğe bağlıdır. Gruptaki her öğe için yürütülecek bir veya daha fazla ifadeyi belirtir.
- Devam Etme Süresi, kontrolü Her Döngü İçin'nin başlangıcına aktarır. İsteğe bağlıdır.
- Çıkış İçin, Her döngü için denetimi dışarı aktarır. İsteğe bağlıdır.
- Sonraki, Her Biri İçin döngüsünün sonunu işaretler. Gereklidir.
Örnekler
Bu ifadenin nasıl kullanılacağını gösterelim:
Adım 1) Yeni bir konsol uygulaması oluşturarak başlayın.
Adım 2) Aşağıdaki kodu kullanın:
Module Module1Sub Main()Dim myArray() As Integer = {10, 3, 12, 23, 9}Dim item As IntegerFor Each item In myArrayConsole.WriteLine(item)NextConsole.ReadKey()End SubEnd Module
Adım 3) Kodu çalıştırmak için üst çubuktan Başlat düğmesine tıklayın. Aşağıdaki sonucu almalısınız:
İşte kodun bir ekran görüntüsü:
Kod Açıklaması:
- Module1 adlı bir modül oluşturma.
- Ana alt prosedürü başlatmak.
- 4 tam sayı kümesiyle myArray adında bir dizi oluşturma.
- İtem adında bir tamsayı değişkeni oluşturma.
- MyArray adlı dizinin öğeleri üzerinde yineleme yapmak için öğe değişkenini kullanma.
- Dizide bulunan öğeleri yukarıdaki ifade ile konsolda yazdırmak.
- For Each döngüsünün sonu.
- Bir kullanıcının pencereyi kapatmak için işlem yapmasını beklerken konsol penceresini bir süre duraklatmak.
- Ana alt prosedürün sonu.
- Modülün sonu.
Döngüler İçin Yuvalanmış
For Each döngüsü yuvalanabilir. Bu, bir For Each döngüsü başka bir For Each döngüsü içine koyduğumuzda gerçekleşir. Bunu bir örnekle gösterelim.
Adım 1) Yeni bir konsol uygulaması oluşturun.
Adım 2) Aşağıdaki kodu kullanın:
Module Module1Sub Main()Dim nums() As Integer = {12, 23, 35}Dim names() As String = {"Guru99", "alice", "antony"}For Each n As Integer In numsFor Each st As String In namesConsole.Write(n.ToString & st & " ")NextNextConsole.ReadKey()End SubEnd Module
Adım 3) Kodu çalıştırmak için üst çubuktan Başlat düğmesine tıklayın. Aşağıdaki çıktıyı almalısınız:
İşte kodun bir ekran görüntüsü:
Kod açıklaması:
- Module1 adlı bir modül oluşturma.
- Ana alt prosedürü başlatmak.
- Bir tam sayı kümesiyle nums adında bir dizi oluşturma.
- Bir dizi isimle isim isimli bir dizi oluşturmak.
- Bir değişken n oluşturma ve onu nums adlı dizide bulunan öğeleri yinelemek için kullanma. Bu, Her Bir Döngü için dış kısımdır.
- St adında bir değişken oluşturmak ve ad adlı dizide bulunan öğeleri yinelemek için kullanmak. Bu, Her döngü için iç kısımdır.
- İki dizideki öğeleri birleştirmek. Nums dizisindeki her öğe, names dizisindeki her öğe ile birleştirilecektir. ToString işlevi, nums dizisinden okunan sayıları dizelere dönüştürmemize yardımcı olur. "", Her kombinasyondan sonra bir boşluk oluşturmamıza yardımcı olur. Kombinasyon, & (ve işareti) kullanılarak elde edilmiştir.
- Her döngü için iç kısmın sonu.
- Dış Her Döngünün sonu.
- Kullanıcının kapatmak için işlem yapmasını bekleyen konsol penceresini duraklatın.
- Ana alt prosedürün sonu.
- Modülün sonu.
Şunun İçin Çık ve Devam Et
Exit For deyimini kullandığınızda, yürütme For Each
… Sonraki döngü ve kontrol, Next ifadesinden sonra gelen ifadelere aktarılacaktır.Continue For deyimini kullandığınızda, denetim, döngünüzün bir sonraki yinelemesine aktarılacaktır. Bunu bir örnekle gösterelim:
Adım 1) Yeni bir konsol uygulaması oluşturarak başlayın.
Adım 2) Aşağıdaki kodu kullanın:
Module Module1Sub Main()Dim nums() As Integer ={10, 12, 14, 17, 19, 23, 26, 31, 33, 37, 40, 48}For Each n As Integer In numsIf n>= 17 And n <= 25 ThenContinue ForEnd IfConsole.Write(n.ToString & " ")If n = 37 ThenExit ForEnd IfNextConsole.ReadKey()End SubEnd Module
Adım 3) Üst çubuktan Başlat düğmesine tıklayarak kodu çalıştırın. Aşağıdaki sonucu almalısınız:
İşte kodun bir ekran görüntüsü:
Kod Açıklaması:
- Module adında bir modül oluşturma 1.
- Ana alt prosedürü başlatmak.
- Bir tam sayı kümesiyle nums adında bir dizi oluşturma.
- N adında bir değişken oluşturarak, onu nums dizisinde bulunan öğeleri yinelemek için kullanırız.
- Değişken n'nin değerini kontrol etmek için bir If… Then koşulu kullanma. Değer 17 (17 dahil) ile 25 (25 dahil) arasındaysa, yineleme dizideki sonraki öğeye atlayacaktır.
- Yukarıdaki değerlerin atlanması burada yapılır. Bu, atlamayı gerçekleştirmek için gerekli olan ifadedir. Bu, For Each döngüsünün atlanan öğeler için çalışmayacağı anlamına gelir.
- If koşulunu sonlandırın.
- Diziden elde edilen değerlerin konsolda yazdırılması. ToString işlevi, değerleri sayılardan dizelere dönüştürmemize yardımcı olur. "", Yazdırılan her değerden sonra biraz boşluk yaratacaktır.
- Yineleme değişkeni n, değeri 37 olduğunda If… Then koşulu kullanılarak kontrol ediliyor.
- Yukarıdaki koşul, yani n = 37 değeri doğru olduğunda For Each döngüsünden çıkma. Bu, dizi öğelerindeki yinelemenin duracağı anlamına gelir.
- Yukarıdaki If koşulunun sonu.
- For'un Sonu… Her ifade.
- Kullanıcının kapatmak için işlem yapmasını bekleyen konsol penceresini duraklatın.
- Ana alt prosedürün sonu.
- Modülün sonu.
Özet
- For Each ifadesi, bir koleksiyonda veya bir dizide bulunan her öğeyi yinelemek için kullanılır.
- Geliştirme sırasında, yinelemenin nasıl yapıldığını kontrol etmek için For Each deyimini Exit For ve Continue For deyimleriyle birleştirebilirsiniz.