ComboBox y TextBox

Jaqueline
15 de Julio del 2004
Tengo un problema;

Estoy haciendo un programa que manipula una base de datos X. todo me va de maravilla pero mi duda es la siguiente:

En mi programa tengo un ConboBox con las siguientes opciones:

ComboBox
Cartas administrativas
Cartas retro alimentaci贸n
etc...

Y Tambien abajo del mismo Tengo un TexBox (caja de texto) Que esta vacia...

Lo que yo quiero es lo siguiente:

Cuando yo baya al comboBox y pulse Cartas administrativas, en mi Texbox se muestre dicha informaci贸n , y si pulso otra casilla del mismo comboBox, se muestre la informaci贸n en el mismo Texbox

Hal alguna manera de hacerlo.

Espero haberme explicado bien.

Gracias

semperfimxl
15 de Julio del 2004
Utiliza el evento CLICK del combobox...

Private sub combobox1_click()
textbox.text = combobox1.list(combobox1.listindex)
end sub

De esta manera, cuando acceses el combobox, al hacer click en alguno de sus items, el evento CLICK se encarga de enviar la informacion del item seleccionado al textbox...

Saludos !

tecniCam
15 de Julio del 2004
Si lo que quieres es que el Text1 muestre lo mismo que aparece en el ComboBox, debes hacer lo que sigue:

Private Sub Combo1_Click()
Text1 = Combo1.Text
End Sub

Si pones ListIndex aparecer谩 el 铆ndice, o sea, el n煤mero de la lista, por ejemplo el 3.