If you mean want to find out how many items are checked then take a look at the Selected property:
Code:
    Dim i As Integer
    Dim strItems As String
    
    For i = 0 To List1.ListCount - 1
        If List1.Selected(i) = True Then
            strItems = strItems & List1.List(i) & vbCrLf
        End If
    Next
    MsgBox strItems
------------------

Serge

Software Developer
[email protected]
[email protected]
ICQ#: 51055819