AYUDA URGENTE PLEASE AMIGOS

SPOW
07 de Octubre del 2004
Estoy realizando un pequeño programa el cual los combo voy contiene informacion como esta:
1 Dtto Capital
2 Anzoategui
3 Aragua
4 Apure

Necesito saber que puedo utilizar para que dependiendo de la seleccion que se haya echo me copie a dos text box diferentes la informacion que se haya seleccionado. Un text que tenga el numero "1" (por ejemplo) y otro con el nombre "DTTO CAPITAL" (por ejemplo, que seria el primer caso) pero que estos se actualizen automaticamente dependiendo de la seleccion que se haga... Muchas Gracias amigo.

Esta data la obtengo en los combo box por la siguiente instruccion:

Set centros = Data.OpenRecordset("select distinct ESTADO1, DES_ESTADO from CENTROS")

If centros.RecordCount > 0 Then
centros.MoveFirst
Do While Not centros.EOF
CBOestado.AddItem centros!estado1 & " " & centros!des_estado
centros.MoveNext
Loop

maxi
07 de Octubre del 2004
usa el evento click del combobox
Ej.
dim strTexto as string
'la propiedad listindex devuelve el indice del elemento
'seleccionado
if combobox1.listindex <> -1 then
strTexto=combobox1.list(combobox1.listindex)
text1.text= mid(strtexto,1,instr(1,strexto," ") -1)
text2.text= mid(strTexto,instr(1,strTexto," ") +1)
end if