 ctl As vbalListViewCtl
   If pbVerify(ctl) Then
      ctl.fSubItemCaption(m_lIndex, m_lSubItemIndex) = sText
   End If
End Property
Public Property Get IconIndex() As Long
Attribute IconIndex.VB_Description = "Gets/sets the icon to display for this
 sub item  if the control has the SubItemImages property set."
Dim ctl As vbalListViewCtl
   If pbVerify(ctl) Then
      IconIndex = ctl.fSubItemIconIndex(m_lIndex, m_lSubItemIndex)
   End If
End Property
Public Property Let IconIndex(ByVal lIconIndex As Long)
D