Visual Basic.NET

Hola,

prueba este pequeño pero simple ejemplo:

Dim strConexion As String
Dim objConexion As OleDb.OleDbConnection
Dim objComando As OleDb.OleDbDataAdapter
Dim objDS As New DataSet
strConexion = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA
SOURCE=c:\BD_Empleados.mdb"
objConexion = New OleDb.OleDbConnection(strConexion)
objComando = New OleDb.OleDbDataAdapter("Select Id_Empleado,
Nom_Empleado From tbl_Empleados", strConexion)
objComando.Fill(objDS, "Ejemplo")
ComboBox1.DataSource = objDS.Tables("Ejemplo")
ComboBox1.DisplayMember = "Nom_Empleado"
ComboBox1.ValueMember = "Id_Empleado"
ComboBox1.SelectedItem = 0

Rellena los datos de una tabla en un control ComboBox.

Espero que te ayude.

Un saludo.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"José Luis" wrote:

Quisiera saber como puedo llenar un ComboBox por medio de una Base de Datos,
la conexión la tengo con ADODC. Si pueden envienme el código de como va.