List View

[J_BEYTIA]

Im trying to add subitems to my listview from my class module. But I keep getting the following message: Error: User-defined type not defined
How do I make my class recognize the listiem property for my listview?


Code

ex: Dim itmCurrent as ListItem <------ Error

Set itmcurrent = m_objEnvironment.lvwPS.ListItems.Add()

itmcurrent.Text = sLevel

[pdeutsc]

You probably don't have Windows Common Controls cheked in your components list.