dim A_DV As New DataView
'DataView mit Daten befüllen

Private _myDV As DataView
 
    Public Property MyDataView() As DataView
        Get
            Return _myDV
        End Get
        Set(ByVal Value As DataView)
            _myDV = Value
        End Set
    End Property