counting a list box

[QWERTY]

I'm not sure what you are asking about but you could use ListBox.Index Property.

Example:

Private Sub List1_Click()
    Text3.Text = List1.ListIndex
End Sub

------------------
Visual Basic Programmer (at least I want to be one)
------------------
PolComSoft
You will hear a lot about it.