none
Pasar una seleccion COMBOBOX a un TEXTBOXT RRS feed

  • Pregunta

  • Saludos

    Haber si pueden ayudarme con una duda.

    Tengo un ComboxBox que eh llena de un campo de mi tambla de la base de dato el campo se llama "No_Llamada" y contiene una lista del 1 hasta el 5. El codigo que use es el siguiente...

    Data2.Recordset.MoveFirst

    Do While Not Data2.Recordset.EOF
        Combo1.AddItem Data2.Recordset.Fields("No_Llamada")
        Data2.Recordset.MoveNext
    Loop

    Lo que quiero hacer es que cuando el usuario de clic a uno de los elementos del comboBox label1 muestre un mensaje y textbox1 muestre un valor de la misma tabla pero del campo empleado (txtempleado)..

     

     

     

    jueves, 30 de junio de 2011 22:27

Todas las respuestas

  • Para empezar podrías insertar en el combo, el id (si es un número) del empleado, de manera de poder buscar la otra información en la base de datos.

    i=0

    Do While Not Data2.Recordset.EOF
     Combo1.AddItem Data2.Recordset.Fields("No_Llamada")

    combo1.itemdata(i)=data2.recordset.fields("id_empleado") '(suposiciones mías)

    i=i+1

    ...

    para colocar un mensaje en una etiqueta, en el evento change

    select case combo1

    case=1

    label1.caption="usted seleccionó 1. Debe indicar...blabla"

    case=2

    label1.caption="ahora es 2.."

    end select

     

    y buscar la otra información, utilizas el itemdata del combo, el cual contiene el id del empleado

    set nid=tuconexion.execute("SELECT nombres_empleado from tu_tabla_empleados WHERE ide=" & Combo1.ItemData(Combo1.ListIndex))

    if not nid.eof then

    msgbox "el empleado es " & nid(0)

    else

    msgbox "No se encontró información",vbexclamation,"Que raro..."

    end if

    set nid=nothing

    viernes, 1 de julio de 2011 0:39
  • Hola Guarracuco por responder tan rápido...

     

    1. Entiendo la forma de llenar el Combobox

    2. El código que me dice van dentro del evento change de que: Combobox, label, botón...

     

    Eh avanzado un poco con el código...ahora que me falta es: PASAR LA SELECCION DE UNAS DE LA OPCIONES QUE CONTIENE EL COMBOBOX (por ejemplo seleccione el código 3) Y QUE AUTOMATICAMENTE DESPLEGAR UN MENSAJE EN UN LABEL "usted selecciono el código X " y en un txtbox "El nombre del empleado a que le corresponde ese código" txtEmpleado = " "...

     

    Te agradezco la ayuda...a ver si me puede seguir ayudando con esto...

    viernes, 1 de julio de 2011 16:01
  • Hola Guarracuco por responder tan rápido...

     

    1. Entiendo la forma de llenar el Combobox

    2. El código que me dice van dentro del evento change de que: Combobox, label, botón...

     

    En el evento del ComboBox.


    Eh avanzado un poco con el código...ahora que me falta es: PASAR LA SELECCION DE UNAS DE LA OPCIONES QUE CONTIENE EL COMBOBOX (por ejemplo seleccione el código 3) Y QUE AUTOMATICAMENTE DESPLEGAR UN MENSAJE EN UN LABEL "usted selecciono el código X " y en un txtbox "El nombre del empleado a que le corresponde ese código" txtEmpleado = " "...

     

    Te agradezco la ayuda...a ver si me puede seguir ayudando con esto...


     Te aconsejo que abras nuevos post para tus nuevas dudas. Así es más complicado que te respondan y que el post sea de utilidad para otros. 

     

    Recuerda marcar como respuesta el post de guarracuco si solucionó tu problema/duda original.

     

    Un saludo


    Jovino Rodríguez
    MCP
    Sharp Code Blog
    viernes, 8 de julio de 2011 16:59
  • Gracias Guarracuco  por tu informacion, me diste la pista para solucionar el caso....

    martes, 12 de julio de 2011 14:25