ComboBox con bases de datos

Hola estoy en esto de visual basic 6.0 y tengo 5 base de datos que son los años 2000 2001 hasta el 2004 y en casa base de dato tengo las tablas de los 12 meses bueno quiero ver como en un combobox puedo colocar los años y en otro combobox los meses y me de la información ejemplo marcar combobox1 año 2000 combobox2 mes enero y dar la información
De ante mano muchas gracias y suerte

1 Respuesta

Respuesta
1
El primer combo lo veo un poco difícil pero lo puedes hacer de tal forma que le agregues a mano los años.
El segundo es más fácil, siempre le vas a agregar los datos de todos los meses, es decir, los nombres, si en tus tablas buscas por clave o número de mes, pues simplemente le colocas in indice y listo.
¿Qué es lo que quiere decir a mano? Para el primer combobox y me puede dar un ejemplo para el segundo se lo agradecería mucho gracias igual por la respuesta
Adapta la siguiente rutina para los dos procesos y a mano significa programar.
Sub CargaMes(ByVal cCombo As ComboBox)
cCombo.AddItem "Enero"
cCombo.ItemData(cCombo.NewIndex) = 1
cCombo.AddItem "Febrero"
cCombo.ItemData(cCombo.NewIndex) = 2
cCombo.AddItem "Marzo"
cCombo.ItemData(cCombo.NewIndex) = 3
cCombo.AddItem "Abril"
cCombo.ItemData(cCombo.NewIndex) = 4
cCombo.AddItem "Mayo"
cCombo.ItemData(cCombo.NewIndex) = 5
cCombo.AddItem "Junio"
cCombo.ItemData(cCombo.NewIndex) = 6
cCombo.AddItem "Julio"
cCombo.ItemData(cCombo.NewIndex) = 7
cCombo.AddItem "Agosto"
cCombo.ItemData(cCombo.NewIndex) = 8
cCombo.AddItem "Septiembre"
cCombo.ItemData(cCombo.NewIndex) = 9
cCombo.AddItem "Octubre"
cCombo.ItemData(cCombo.NewIndex) = 10
cCombo.AddItem "Noviembre"
cCombo.ItemData(cCombo.NewIndex) = 11
cCombo.AddItem "Diciembre"
cCombo.ItemData(cCombo.NewIndex) = 12
cCombo.ListIndex = -1
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas