Counting items in a Multi-Selection Listbox (Quickie)

[diamondgeezer1974]

I have a multi-Selection list box, and a label that says "0 names selected".

What do I use, if the user selects 3 names in the listbox, in order for the label to say "3 names selected".

ListIndex, tells me whats been selected, and ListCount tells me how many items in the list.......but what tells me how many items have been selected?

Thanks

 

[Andrew Poulsom]

Here is an example:

Private Sub ListBox1_Change()
    Dim i As Integer
    Dim Counter As Integer
    Counter = 0
    With ListBox1
        For i = 0 To .ListCount - 1
            If .Selected(i) Then
                Counter = Counter + 1
            End If
        Next i
    End With
    Label1.Caption = Counter & " items selected"
End Sub

 

[Norie]

Sorry but there's no property that will return a count of the no of items selected.