LazyXML.vb

    Public MustInherit Class LazyXMLBase
      Implements IEnumerable(Of XNode)

      Public MustOverride Function Render() As XNode

      Public Function GetEnumerator() As System.Collections.Generic.IEnumerator(Of System.Xml.Linq.XNode) Implements System.Collections.Generic.IEnumerable(Of System.Xml.Linq.XNode).GetEnumerator
        Return Enumerable.Repeat(Me.Render(), 1).GetEnumerator()
      End Function

      Public Function GetEnumerator1() As System.Collections.IEnumerator Implements System.Collections.IEnumerable.GetEnumerator
        Return Me.GetEnumerator()
      End Function

      Public Overrides Function ToString() As String
        Return Me.Render().ToString()
      End Function

    End Class