Como pasar datos de un listbox a variable

[lacus]

Hola me encuentro con un problema estoy esribiendo un programa y nesecito hacer lo siguiente :

- Tengo un Listbox q lleno con datos
- Nesecito q cada linea q tenga el listbox se almacene
en una variable q tendria q ser con indice.

ejem.

list1 contine :
Hola
mundo
lindo
dia

lo q tengo q lograr es q en una variable como por ejem.

a(0) sea igual a Hola
a(1) sea igual a mundo

de esta forma hasta completar la cantidad de lineas q tenga el list.

y poder acceder a cualquier valor de la varible cambiendole el indice.

espero q me puedan ayudar , Gracias.

[Insomnia]

Hola

Utiliza el siguiente código que recorre todo el list1 introduciendo los valores en una array de 10 elementos (puedes crear el array del tamaño que desees). Con el list index seleccionas un elemento de la lista.

Código:

    Dim i as Integer
    Dim a(10) As String
    
    For i = 0 To List1.ListCount - 1
        List1.ListIndex = i
        a(i) = List1.Text
    Next i

--Saludos--