Visual Basic - Consulta sobre Listbox

Hola

Tengo un problema con una listbox que lleno desde una consulta Sql , esta Listbox tiene 2 campos y es de multiseleccion.

El problema que tengo es poder separar los 2 campos que tiene una linea de la Listbox en variables por separado

es decir yo tengo : Campo1 | Campo2 --> esto es en la Listbox

y al hacer clic en uno que sus campos queden asi :

Campo1 --> Variable1

Campo2 ---> Variable 2


Gracias

si necesitas tomar informacion de la columnas del list, te sugiero utiliza un datagrid que es sencillo de usar y tomar la informacion y lo puedes conectar a la consulta con un control adodc y en las propiedades eliges las columnas que deseas mostrar.

Private Sub List1_Click()
Dim campos() As String
campos = Split(List1.Text, "| ")
Text1.Text = campos(0)
Text2.Text = campos(1)
End Sub

Ivan eso funciona bien pero ademas esta listbox es de multiseleccion . necesito recorrerla y que cada elemento seleccionado pase campo 1 a varieble 1 y campo 2 a variable2


Gracias por tu ayuda ..
Krifs

Cambia Text1.Text y Text2.Text por variable1 y variable2 y pones el código en un bucle desde el primer elemento de la lista hasta el último, comprobando los que están seleccionados.