obtener datos de un listbox

Question

Hola a todos en el foro..

tengo un problema espero alguien me pueda ayudar...

 

resulta que tengo un listbox con dos columnas y necesito que al seleccionar una fila  me  pase los valores a dos textbox, nos e como hacer esto. nesesito sacar los valores de las dos columnas y hasta ahora solo logro sacar el valor de la columna.

al crear un listbox le en las propiedades especifico cual de las columnas quiero que sea la del valor y con la siguiente linea obtengo ese valor:

TextBox1 = ListBox1.List(ListBox1.ListIndex)

ahora como puedo obtener el valor de al otra columna.

saludos gracias por la informacion que me puedan proporcionar..

Answer 1

Coloca aquí parte del código que utilizas para llenar el listbox.

Answer 2

he creado un arreglo que lleno con un cursor mediante un  ciclo,  

 

Dim arreglo(820, 1) As String
Do
   arreglo(ta, 1) = row.Value(0)
   arreglo(ta, 0) = row.Value(1)
   Set row = cursor.NextRow
   ta = ta + 1
  
Loop Until (row Is Nothing)
ListBox1.List() = arreglo

Answer 3

Ana, hasta donde sé, no se puede crear un listbox de varias columnas DIRECTAMENTE, sin el uso de funciones complejas (http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/118-listbox-con-columnas.htm).

Cuando lleno un listbox, lo hago de la siguiente manera :

With List1
.AddItem rst!Nombres
.ItemData(t) = rst!idDestin
.Selected(t) = True
End With

donde puedo hacer uso del valor de la lista como del itemdata:

tuid=List1.ItemData(List1.ListIndex)

Answer 4

Mas facil es usar un listview

Answer 5

Yo lo haría con un flexgrid

Answer 6

La ventaja del listview similar al listbox es el check que el flexgrid no tiene y hay que implementarlo a mano.

Aparte de iconos,subiconos,colores,etc.

Answer 7

Hola a todos y gracias por sus respuestas  pero no puedo utilizar un listview ni un flexgried porque loq ue estoy haciendo es un macro no una aplicacion es decir no tengo todas las herramientas de visual y uno de los objetos que tengo y puedo utilizar es solo el listbox.

habra alguna manera de de sacar los valores de las columnas de el listbox o debo buscra otra alternativa.

gracias por las posibles respuestas....

Answer 8

Yo probe tu codigo y da error,no se le puede asignar un vector al list del listbox,se hace con additem,a los sumo podes usar tab para separar los que serian las columnas.

 

El listview es un ocx de windows,porque no podes usarlo ??

Answer 9

Hola luis..

estoy utilizando arcgis desktop y no tengo ese objecto, puedo agregar los elementos con additem pero los datos los tengo en un cursor como no puedo agregar del cursor directamente ala lista tengo que usar un arreglo, en la ayuda del desktop encontre la manera de llenar la lista con el arreglo y es esa, ami no me marca error me muestra bien los datos de las dos columnas, creo que con el id que es la columna 0 are un select ene l evento clic y probare obteniendo la siguiente columna y mostrarla asi porque hasta ahora no he encontrado la manera de obtener los dos valores.

gracias por tu ayuda saludos....

Answer 10

Debe ser un listbox hecho a medida por el arcgis entonces porque el normal de vb no te deja.

Answer 11

si el arcgis solo  me da las opciones que dentro puedo utilizar, incluso no me da todas las propiedades del listbox.

pero ya he encontrado la solución dentro del event clic hago un query utilizando el ID  y obtengo la descripcion del ID y ma muestro en el otro textfiled.

saludos....