Imports System.ComponentModel Imports DevExpress.DataAccess.ObjectBinding Public Class ReportSource Public Property Head As ReportHead Public Property Positions As IEnumerable(Of ReportPosition) Public Iterator Function GetPositionList() As IEnumerable(Of ReportPosition) For Each oPosition In Positions Yield oPosition Next End Function End Class