data properties

[peet]

Option Explicit
 
Private mvar_datasource As String
Private mvar_databindings As String
 
Public Property Get databindings() As String
    databindings = mvar_databindings
End Property
 
Public Property Let databindings(ByVal vNewValue As String)
    mvar_databindings = vNewValue
End Property
 
Public Property Get datasource() As String
    datasource = mvar_datasource
End Property
 
Public Property Let datasource(ByVal vNewValue As String)
    mvar_datasource = vNewValue
End Property
'.
'.
'.
'.
'.
'.
'.