como cargar datos en un combo

[rishart]

hola amigos alguien me podria ayudar para poder cargar datos en un combo y como ligarlo a otro combo para que cargue la opcion o caracteristicas de una tabla seleccionanda con el combo anterior

es decir

en un combo yo selecciono el año y que el otro como se carguen los datos de los meses de ese año y el mes seleccionado me lo muestre su valor en un tex.

estoy trajando con bases de datos en access y me ojala alguien pueda ayudarme con este problema que no entiendo como hacerle para cargar los datos

gracias, saludos y espero que me puedan ayudar con mi problema.... saludos

[priuron]

Hola rishart

me encuentro en la misma situacion que tu.
Espero que alguien pueda ayudarnos pronto.

Un saludo

[ReViJa]

Te pongo un ejemplo:

Código:

Private Sub Form_Load()
  
Set BD = OpenDatabase(App.Path & "\BD.mdb")
Set RecSQL = BD.OpenRecordset("SELECT * FROM tabla1")

While Not RecSQL.EOF
  Combo1.AddItem RecSQL.Fields("nombre").Value & "|" & RecSQL.Fields("direccion").Value
  Combo1.ItemData(Combo1.NewIndex) = RecSQL.Fields("id").Value
  RecSQL.MoveNext
Wend

RecSQL.Close
Set RecSQL = Nothing
End Sub

Private Sub Combo1_Click()
Combo2.Clear
Set RecSQL = BD.OpenRecordset("SELECT * FROM tabla2 WHERE id LIKE " & Combo1.ItemData(Combo1.ListIndex))

While Not RecSQL.EOF
  Combo2.AddItem RecSQL.Fields("Telefono").Value & "|" & RecSQL.Fields("Mail").Value
  RecSQL.MoveNext
Wend

RecSQL.Close
Set RecSQL = Nothing
End Sub

Private Sub Form_Unload(Cancel As Integer)
Set BD = Nothing
End Sub

No es lo que tu pides pero es muy parecido, me explico...
Al cargar el formulario llena el combo1 con los datos de la tabla1 y en la propiedad Combo1.ItemData(Combo1.NewIndex) le agrego el campo ID (clave principal de la tabla) para poder hacer referencia a ese registro.

Al seleccionar un registro en el cobo1 vaciamos el cobo2 (para no mezclar datos y hacemos una SQL con la condición(WHERE) Combo1.ItemData(Combo1.ListIndex) que nos devuelve la ID del registro que previamente antes habíamos guardado y procede a cargar su teléfono y su email.

Necesitas 2 tablas y vincularlas por su ID, ok.

Si tenéis dudas con la conexión a access podéis mirar AQUI

Espero que os sirva.

[priuron]

muchisimas gracias revija