Visual Basic - Uso del List Box...

Hola, Creo que la rutina que estoy buscando es sencilla pero no me sale... Estoy usando un ListBox en donde coloco una lista de nombres y cuando termina de llenar esta lista con los nombres necesito que me mande un mensaje con un total de los diferentes nombres que hay en la lista... Puede alguien ayudarme???
Gracias...

Lo que debes hacer es sencillo:

Cantidad: list1.listcount 'esto te dice cuanto items hay en la lista
Nombres: debes utilizar un For ,ejm:

For i=0 to list1.listcount-1
msgbox list1.list(i) ' esto te dara nombre por nombre
next

espero te ayude!!

Bueno es sencillo.

while not rs.eof
List1.additem rf.fields("CampoNombre")
rs.movenext
wend
' Esta linea te dice cuantos nombres se incluyeron
msgbox "Se han ocupado " & List1.ListCount

SI TU FUENTE DE DATOS CONTEMPLA DUPLICIDAD DE NOMBRES Y SOLO QUIERES QUE TE CUENTE UNA SOLA VEZ EL NOMBRE REPETIDO SERIA

While Not rs.EOF
Guarda = True
Datoint = rs.fields("CampoNombre")

'Si la lista esta vacia lo hara sin verificar nada
If List1.ListCount = 0 Then List1.AddItem Datoint

'Si la lista contiene algo verificara que no se duplique
For i = 0 To List1.ListCount - 1
List1.ListIndex = i
If Datoint = List1.Text Then
Guarda = False
End If
Next i

If Guarda = True Then
List1.AddItem Datoint
End If

rs.MoveNext
Wend
' Muestra cuantos nombres unicos existen
msgbox "Se han ocupado " & List1.ListCount


ESPERO TE AYUDE
POR TU CORREO TAL VEZ SEAS MEXICANA, ENTONCES SOMOS PAISANOS SALUDOS.

Muy bien!!!, Gracias Chicos... :o)

y saludos desde Chihuahua,México.