RE:Cargar una BD en un Combo box
‘si lo que en realidad necesitás hacer es rellenar un Combo Box con una tabla, lo que podés hacer es usar un DataCombo y poner los datos del Contro ADOCD. o anteriormente denominado Datacontrol para que se rellene sólo.
‘Si esta función es aleatoria, entonces tenés que poner un poco más de código, pero no en el evento Click, porque para cuando se muestre el ComboBox, vos ya tenés que tener cargados los datos:
‘Supongamos que tenés el Data1 con la Tabla cargada
Sub CommandButton1_Click( )
Data1.Recordset.Movefirst
Do While Not Data1.Recordset.EOF ‘ Mientras no termine el Data
ComboBox1.Additem Data1.Recordset!”Tu_campo”
Data1.Recordset.MoveNext
loop
End Sub
‘Verificá la sintaxis, tené en cuenta que lo estoy haciendo de memoria y puedo quizás equivocarme en la forma de invocar los métodos
Si por el contrario lo que querés hacer es llenar un DataControl con el nombre de la tabla que seleccionas del ComboBox, entoncés:
Data1.Recordsource = “Select * from “ & ComboBox1.Text & “ Where ........etc
Así llenás un Recordset según la tabla que vos elijas con el ComboBox.
Espero que sea esto más o menos lo que necesitabas, sino yo entendí para la ostia.
Lo siento.
Bueno espero te sea útil.
Suerte.