Cevap.

Soru Tarihçesi
Iteratörler, üzerinde geçiş yapılması gereken koleksiyonların ortaya çıkmasıyla birlikte programlama dillerinin önemli bir parçası haline geldi. Visual Basic'te .NET sürümünden itibaren IEnumerable/IEnumerator desteği ile özel yinelemeli koleksiyonlar oluşturmak ve koleksiyonların içeriğine kolay ve özlü bir şekilde erişmek için For Each döngüsü kullanılabilir.

Sorun
Birçok geliştirici yalnızca yerleşik koleksiyonları kullanmakla sınırlı kalmakta ya da IEnumerable arayüzünü doğru bir şekilde uygulamadıkları için For Each üzerinden nesneleri geçiş yapmak mümkün olmamaktadır. Ayrıca, Current ve MoveNext üzerinden iteratörün durumunu yönetmek zorlayıcı olmaktadır.

Çözüm
Yinelemeleri desteklemek için tür, IEnumerable (veya genel IEnumerable(Of T)) arayüzünü uygulamalıdır. IEnumerator'ı uygulayan bir nesne döndüren GetEnumerator fonksiyonunu oluşturun. VB.NET'te, yinelemeli yöntemler için Yield anahtar kelimesi (VB 2015'ten itibaren) de kullanılabilir, bu da geçişin uygulanmasını büyük ölçüde basitleştirir.

Kod örneği:

Imports System.Collections

Public Class SimpleCollection
    Implements IEnumerable
    Private arr() As Integer = {1, 2, 3}

    Public Function GetEnumerator() As IEnumerator Implements IEnumerable.GetEnumerator
        For Each i In arr
            Yield i ' VB 2015+ için
        Next
    End Function
End Class

' Kullanım:
For Each n As Integer In New SimpleCollection()
    Console.WriteLine(n)
Next

Anahtar özellikler:

• For Each'ü desteklemek için türün IEnumerable / IEnumerable(Of T) uygulaması gerekir.
• Uygulama genellikle mevcut bir koleksiyona devredilir ya da kendi koleksiyonunuz oluşturulur.
• Yield ile kolayca iteratörler oluşturabilirsiniz; Yield olmadan IEnumerator'ı manuel olarak uygulamanız gerekecek.

Kandırıcı Sorular.

For Each desteği için hem IEnumerable hem de IEnumerator arayüzlerini uygulamak zorunlu mu?

Hayır, yeterli olan sadece IEnumerable'ı uygulamak ve uyumlu bir iteratör döndürmektir. Geçiş yapmak istiyorsanız, gömülü koleksiyonun mevcut IEnumerator'ını kullanabilirsiniz. Ancak tam özelleştirme için her iki parçanın da uygulanması gerekir.

Kod örneği:

Public Function GetEnumerator() As IEnumerator Implements IEnumerable.GetEnumerator
    Return arr.GetEnumerator() ' dizinin gömülü iteratörünü kullanıyoruz
End Function

Visual Basic’de IEnumerable'ı yalnızca açık bir şekilde (Explicit Interface Implementation) uygulamak mümkün mü?

Evet, arayüzü açıkça uygulamak mümkündür, özellikle de koleksiyonunuzun kendi GetEnumerator'ı varsa ve arayüzün uygulanmasını gizlemek istiyorsanız. Böyle bir GetEnumerator'ı doğrudan çağırmak mümkün olmaz, ancak For Each çalışacaktır.

Kod örneği:

Public Function IEnumerable_GetEnumerator() As IEnumerator Implements IEnumerable.GetEnumerator
    ' ...metodun gövdesi
End Function

GetEnumerator Nothing dönerse ne olur?

Koleksiyonu ilk geçiş yapma girişiminde bir istisna atılır, çünkü For Each uyumlu bir iteratör bekler.

Tipik Hatalar ve Anti-Desenler

• MoveNext/Current metodlarının yanlış uygulanması sebebiyle elemanlar atlanır ya da hata oluşur.
• Çağrılar arasında iteratörün durumu bozulur (örneğin, tekrar geçiş yapılırken gösterim indeksi sıfırlanmaz).
• Eksik veya hatalı bir StopIteration istisnası.

Gerçek Hayattan Bir Örnek

Negatif Durum

Koleksiyon sınıfı IEnumerable'ı uygulamadı ve elemanları geçiş yapmak için ayrı bir Next metodu oluşturdu. Sonuç olarak, genel yöntemlerde veya For Each içinde kullanılamaz, ek metodlar yazmak zorunda kaldık.

Artılar:

• Görev için hızlı bir uygulama.

Eksikler:

• For Each ve LINQ kullanılamaz.
• .NET API ile uyumluluğun kaybı.

Pozitif Durum

Geliştirici IEnumerable ve GetEnumerator'ı uyguladı, koleksiyon artık For Each ile çalışıyor ve LINQ ile bütünleşiyor.

Artılar:

• .NET altyapısı ile süper uyumluluk.
• Kullanım kolaylığı ve çok yönlülük.

Eksikler:

• Yield ortaya çıkmadan önceki manuel uygulamalar için biraz daha fazla kod gerekir.