bVerify(ctl)) Then
      Text = ctl.fSubItemText(m_lID, m_lIndex)
   End If
End Property
Public Property Let Text(ByVal sText As String)
Dim ctl As vbalColumnTreeView
   If (pbVerify(ctl)) Then
      ctl.fSubItemText(m_lID, m_lIndex) = sText
   End If
End Property
Public Property Get Image() As Long
Dim ctl As vbalColumnTreeView
   If (pbVerify(ctl)) Then
      Image = ctl.fSubItemImage(m_lID, m_lIndex)
   End If
End Property
Public Property Let Image(ByVal lIconIndex As Long)
Dim ctl As vbalColumnTreeView
