operty

Public Property Get ItemValueType() As Integer
    ItemValueType = m_iValueType
End Property
Public Property Get ItemType() As Integer
    ItemType = m_iType
End Property
Public Property Let ItemType(ByVal iType As Integer)
    m_iType = iType
    If (m_bLoaded) Then
        optType(iType).Value = True
    End If
End Property
Public Property Get Cancelled() As Boolean
    Cancelled = m_bCancel
End Property
Public Property Let Parent(ByVal sParent As String)
    m_sParent = sParent
    If (m_bLoaded)