Título del mensaje: Creación de una ComboBox de Access en vb2010

Llevo varios días intentando crear una ComboBox para pasar un campo a otra tabla, claro. Lo más "apañado" que he encontrado es lo que sigue, pero me da el eçmensaje de error: "No se han especificado valores para algunos de los parámetros requeridos".
En el código original tenía algo que he modificado o suprimido porque no le encontraba sentido (y me daba errores, además). Esto está entre corchetes

¿Me podéis decir qué está mal? Muchas gracias.

Private Sub .....
....
'CARGAR EL COMBOBOX
MsgBox("3")
con.Close()
dbProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"
dbSource = "Data Source = C:\Users\Alberto Moreno Gil\Mis documentos\bd4.mdb"
con.ConnectionString = dbProvider & dbSource
con.Open()
sql1 = "SELECT * FROM Denominacion WHERE Not clase ='Acciones' ORDER BY denominacion"
MsgBox("4")
Cargar_combo(sql1, ComboBoxDenominaciones)
con.Close()
Catch ex As Exception
MessageBox.Show(ex.Message, "ComboBox", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Try
End Sub
'.......
Public Sub Cargar_combo(ByVal sql1 As String, ByVal ComboBoxDenominaciones As ComboBox)
'Pasamos datos de la BD al DA

MsgBox("Saltó a Cargar Combo")
Dim ds1 As New DataSet()
Dim cb As New OleDb.OleDbCommandBuilder(da)
con.Close()
'Pasamos datos del DA al DS mediante el procedimiento LlenarDs
[BD.]LlenarDs(ds1, sql1)
MsgBox("7")
ComboBoxDenominaciones.DataSource = ds1.Tables(0)
ComboBoxDenominaciones.DisplayMember = ds1.Tables(0).Columns(0).Caption.ToString()
ComboBoxDenominaciones.ValueMember = ds1.Tables(0).Columns(1).Caption.ToString()
End Sub
'......
Public Sub LlenarDs(ByRef ds1 As DataSet, ByVal sql1 As String)
MsgBox("4...")
con.Open()
Dim adaptador As New OleDb.OleDbDataAdapter(sql1, con[bd])
MsgBox("5...")
adaptador.Fill(ds1) ' ¡¡¡Aquí SE DETIENE!!!
MsgBox("6...")
con.Close()
End Sub

Título del mensaje: Re: Creación de una ComboBox de Access en vb2010

yo creeria q te falta ponerle las credenciales a la cadena de conexion, checa esta liga, ahi te dicen como, de entrada veras q acces ni siquiera lo catalogan como manejar de base de datos. Checa bien la version q usas de access tambien.

saludos

Título del mensaje: Re: Creación de una ComboBox de Access en vb2010

Gracias por tu respuesta. Una vez descubierta la causa, la verdad es que me da vergüenza contarlo. Como he hecho unas cuantas modificaciones a la BD una de ellas fue suprimir en la tabla "denominaciones" el campo "clase". Luego en la orden SQL puse SELECT ... WHERE clase... y claro me dio el error que dije. . Pensando que estaba por ahí la causa fui simplificando la orden SELECT hasta que di con el gazapo. Ahora, he repuesto el campo "clase", porque realmente me viene bien, y todo funciona perfectamente. Gracias.

Título del mensaje: Re: Creación de una ComboBox de Access en vb2010

Gracias por tu respuesta. Una vez descubierta la causa, la verdad es que me da vergüenza contarlo. Como he hecho unas cuantas modificaciones a la BD una de ellas fue suprimir en la tabla "denominaciones" el campo "clase". Luego en la orden SQL puse SELECT ... WHERE clase... y claro me dio el error que dije. Pensando que estaba por ahí la causa fui simplificando la orden SELECT hasta que di con el gazapo. Ahora, he repuesto el campo "clase", porque realmente me viene bien, y todo funciona perfectamente. Gracias.

Título del mensaje: Re: Creación de una ComboBox de Access en vb2010

no te preocupes, a todos nos puede pasar!!!
lo bueno fue q le diste al clavo!!!

saludos