List1.ListCount es el numero de items del listbox
List1.List(ListIndex) me muestra el primer item de la lista
List1.List(ListIndex + 1) me muestra el segundo item de la lista
con esto hago recorrer la lista
Código
List1.ListIndex = List1.ListIndex + 1 If List1.ListIndex = List1.ListCount - 1 Then List1.ListIndex = -1
alguna idea de como obtener lo explicado...
PD: ya revise lo de la api SendMessage...
http://www.recursosvisualbasic.com.ar/htm/listado-api/154-obtener-items-de-listbox-combo-con-sendmessage.htm
pero la verdad ni idea de como hacerlo para que lea item por item ... y lo ponga en un label ..