Lista
Hola experto antes que todo te deseo una feliz navidad y un excelente año nuevo, muchas felicidades.
Bueno hay te va mi problemita estoy haciendo un formulario de facturas pero necesito que el nombre del cliente me despliegue una lista o un subformulario para que no exista error al capturar el cliente, ya intente con comboBox, con DataCombo pero no se que estoy haciendo mal, soy principiante en eso del visual, bueno de antemano te agradezco tu ayuda.
Gracias y mucha felicidades que santa te traiga tus regalitos por ser tan buen samaritano. Bye
Bueno hay te va mi problemita estoy haciendo un formulario de facturas pero necesito que el nombre del cliente me despliegue una lista o un subformulario para que no exista error al capturar el cliente, ya intente con comboBox, con DataCombo pero no se que estoy haciendo mal, soy principiante en eso del visual, bueno de antemano te agradezco tu ayuda.
Gracias y mucha felicidades que santa te traiga tus regalitos por ser tan buen samaritano. Bye
2 respuestas
Respuesta de pjlm99
1
Idilioatomic:
Puedes usar cualquiera de los dos controles: el combobox o el datacombo.
La cuestión es que puedes enlazarlos a una base de datos si es que tienes una por detrás.
En el caso del combobox, debes recorrer la tabla y campo que quieres agregar a tu base de datos y añadir los valores a la lista con el método add del control, es decir:
(Supongamos que tienes un recordset de clientes)
set rs = db.openrecordset("clientes", dbopendynaset)
if rs.recordcount > 0 then
do until rs.eof
combo1.add rs!nombre_cliente
rs.movenext
loop
else
combo1.add "No existen clientes en la tabla"
rs.close
end if
Ahora, si lo que quieres es hacerlo a través del enlace a un control datacombo, puedes directamente hacerlo a través de sus propiedades, es decir:
(agregas un control AdoDataControl a tu formulario con el correspondiente enlace a la base de datos a traves de sus propiedad conectionString, supongamos "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Datos.mdb", la tabla a la que haces referencia tambien a traves de su propiedad RecordSource adCmdTable + table = "clientes" (supuestamente), y luego agregas el datacombo y estableces las siguientes propiedades:)
DataSource = Data1
ListField = Nombre_Cliente (esta propiedad dice que es lo que se mostrará en la lista)
BoundColumm=Cliente_ID (esta propiedad dice que es lo que se actualizará en la tabla cuando cambies el valor, en este caso, el ID del cliente).
DataField=Nombre_Cliente (el nombre de la columna de datos de la tabla)
Todo es bastante intuitivo. Con un poco de práctica lo sacas fácil.
Igualmente te mando un link para que veas algunos ejemplos si te sirve, cualquier cosa me lo comentas.
(http://espasoft.kaos.es/2000VB/TEMAS.HTM)
Espero haberte ayudado, cualquier cosa, me lo comentas y te amplio la solución.
Un abrazo
Pablo
Puedes usar cualquiera de los dos controles: el combobox o el datacombo.
La cuestión es que puedes enlazarlos a una base de datos si es que tienes una por detrás.
En el caso del combobox, debes recorrer la tabla y campo que quieres agregar a tu base de datos y añadir los valores a la lista con el método add del control, es decir:
(Supongamos que tienes un recordset de clientes)
set rs = db.openrecordset("clientes", dbopendynaset)
if rs.recordcount > 0 then
do until rs.eof
combo1.add rs!nombre_cliente
rs.movenext
loop
else
combo1.add "No existen clientes en la tabla"
rs.close
end if
Ahora, si lo que quieres es hacerlo a través del enlace a un control datacombo, puedes directamente hacerlo a través de sus propiedades, es decir:
(agregas un control AdoDataControl a tu formulario con el correspondiente enlace a la base de datos a traves de sus propiedad conectionString, supongamos "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Datos.mdb", la tabla a la que haces referencia tambien a traves de su propiedad RecordSource adCmdTable + table = "clientes" (supuestamente), y luego agregas el datacombo y estableces las siguientes propiedades:)
DataSource = Data1
ListField = Nombre_Cliente (esta propiedad dice que es lo que se mostrará en la lista)
BoundColumm=Cliente_ID (esta propiedad dice que es lo que se actualizará en la tabla cuando cambies el valor, en este caso, el ID del cliente).
DataField=Nombre_Cliente (el nombre de la columna de datos de la tabla)
Todo es bastante intuitivo. Con un poco de práctica lo sacas fácil.
Igualmente te mando un link para que veas algunos ejemplos si te sirve, cualquier cosa me lo comentas.
(http://espasoft.kaos.es/2000VB/TEMAS.HTM)
Espero haberte ayudado, cualquier cosa, me lo comentas y te amplio la solución.
Un abrazo
Pablo
Respuesta de sagc20
1
Agrega un nuevo formulario.
En ese formulario, por que no agrega un combo box con todos los nombres de clientes, ahora para que puedas llamar ese formulario desde el otro, tendrás que hacer esto
Desde el formulario principal
Llamas a tu formulario que contiene los nombres de clientes
Digamos que tienes 2 formularios:
frm_prin 'principal
Frm_clientes 'Solo para elegir el cliente
De la siguiente manera:
Dentro de frm_clientes declaras
public cliente as string
ahora en el momento que quieras que el usuario elija
el cliente agrga:
frm_clientes.show vbmodal
Para que aparezca el otro formulario 'VbModal es para que no pueda mover nada que no sea el formulario frm_clientes.
ahora: dentro de frm_clientes agregas un combo: cmb_Cli
y en el evento click
cmb_cli_Click()
frm_pri.cliente=cmb_cli.text
Unload me
Y listo en una variable cliente de tu formulario principal tendrás el cliente que eligió el usuario
En ese formulario, por que no agrega un combo box con todos los nombres de clientes, ahora para que puedas llamar ese formulario desde el otro, tendrás que hacer esto
Desde el formulario principal
Llamas a tu formulario que contiene los nombres de clientes
Digamos que tienes 2 formularios:
frm_prin 'principal
Frm_clientes 'Solo para elegir el cliente
De la siguiente manera:
Dentro de frm_clientes declaras
public cliente as string
ahora en el momento que quieras que el usuario elija
el cliente agrga:
frm_clientes.show vbmodal
Para que aparezca el otro formulario 'VbModal es para que no pueda mover nada que no sea el formulario frm_clientes.
ahora: dentro de frm_clientes agregas un combo: cmb_Cli
y en el evento click
cmb_cli_Click()
frm_pri.cliente=cmb_cli.text
Unload me
Y listo en una variable cliente de tu formulario principal tendrás el cliente que eligió el usuario