1Imports System.Collections.Generic
2Imports System.Collections
3Imports System
4
5<Serializable()> _
6Class GetEnumerator1
7    Implements IEnumerable
8
9    Shared Function Main() As Integer
10        Dim g As New GetEnumerator1
11        Dim o As Object
12        o = g.GetEnumerator()
13    End Function
14
15    Private m_List As New Generic.List(Of GetEnumerator1)
16
17    Public Function GetEnumerator() As System.Collections.IEnumerator Implements System.Collections.IEnumerable.GetEnumerator
18        Return m_List.GetEnumerator
19    End Function
20End Class
21