SoloCodigo

HOLA COMPAÑEROS TENGO UN PROBLEMA ....
ESTOY  TRABAJANDO EN  UNA BASE DE DATOS SQL2000   Y VB6 ..
TENGO UNA TABLA CON LOS SIGUIENTES CAMPOS (CVE_PERSONA,NOMBRE)...
LOS DATOS DEL CAMPO NOMBRE YA SE ME DESPLIEGA EN EN EL COMBO,  BIEN,,,  LO QUE  YO QUIERO E INTENTO HACER ES QUE CUANDO YO SELECCIONE UN DATO DEL CAMPO NOMBRE  DE  LOS QUE SE DESPLIEGAN EN EL  COMBO , LA CVE_PERSONA SE  COLOQUE   EN UN TEXT1.TEXT   QUE TENGO EN MI  FORMA

ESPERO QUE ME AYUDEN GRACIAS POR ESTE FORO


.......    
           

bueno aqui  les dejo el codigo de mi conexion de   vb6 con la base sql......

SERVIDOR = "fa"
BASEDATOS = "casa"
User = "fabian"
Password = "123456"
sSQLConect = "SERVER=" & Trim(SERVIDOR) & ";DATABASE=" & Trim(BASEDATOS) & ";uid=" & User & ";pwd=" & Trim(Password)
Set cn = Nothing
cn.Provider = "sqloledb"
cn.CursorLocation = adUseClient
cn.Open sSQLConect

rs.Open "select * from persona", cn, adOpenKeyset, adLockOptimistic, adCmdText


----- este es el codigo que hace que se me despliegue el combo con los campos
Do Until rs.EOF
Combo2.AddItem rs("nombre")
rs.MoveNext
Loop
rs.Close
End Sub


entonces lo que yo necexito es que cuando yo seleccione un campo de lo que se despliegue en el combo, su cve_persona  se me coloque  en un text1.text que se encuentra en la misma forma.....
ok


 gracias por contestar y tomar en cuenta mi pregunta


espero prota respuesta          

ok muchas  gracias   lo  probare  ....
mil gracias por dar respuesta a mi pregunta....