pregunta tonta sobre additem

[pcarvajal]

bueno, esto es simple (supongo) pero hoy amanecí un tanto falto de ideas :P

Para agregar un item a un listbox es asi:
.Additem "2"
Ahora que pasa si deseo que el numero sea mi "value" y en el listbox se desplegue la descripcion???

En html seria algo asi:
<select>
<option value="2">DOS</option>
</select>

Quiero lo mismo pero en un listbox de vb!
Como lo hago??? como recupero su valor??? :S

[Bellenger]

BUeno en vb no se puede hacer eso como en java, ya que el combo no soporta el value, pero lo que puedes hacer es sacar ese valor desde otro list, o tambien desde una base de datos...

[pcarvajal]

o sea (inventando)... un:
.Additem "2","DOS" no se puede hacer???

[Beakdan]

Pcarvajal:
Tendrás que hacerlo en dos pasos. Para agregar la descripción y la posición del nuevo elemento en un combobox o un listbox, usas AddItem. Pero para asignarle un valor numérico a cada elemento del control, usas ItemData. Por ejemplo, con un control ListBox de nombre List1:

Código:

Private Sub Form_Load()
	List1.AddItem "Uno"
	List1.ItemData(List1.NewIndex) = 1
	List1.AddItem "Dos"
	List1.ItemData(List1.NewIndex) = 2
	List1.AddItem "Tres"
	List1.ItemData(List1.NewIndex) = 3
	List1.AddItem "Cuatro"
	List1.ItemData(List1.NewIndex) = 4
	List1.AddItem "Cinco"
	List1.ItemData(List1.NewIndex) = 5
End Sub
Private Sub List1_Click()
	Debug.Print List1.ItemData(List1.ListIndex)
End Sub

Hasta luego.

[pcarvajal]

la verdad no es necesariamente la posicion la que deseo rescatar, mira es algo asi:
(inventando nuevamente)
.Additem "XYZ","LETRAS DEL ABECEDARIO"
.Additem "48","CUALQUIER COSA"

cosa que en HTML seria:
<select>
<option value="XYZ">LETRAS DEL ABECEDARIO</option>
<option value="48">CUALQUIER COSA</option>

</select>

[lic_dahool]

Vas a tener que usar dos ListBox, uno con lo que quieres mostrar y otro oculto con el valor que quieres tomar y relacionarlos por la propiedad ListIndex.

Aunque yo personalmente preferíria usar un vector en vez de un segundo ListBox.

Saludos.