ESPERO QUE ESTO TE PUEDA AYUDAR
CODIGO:
'Haces el siguiente IMPORTS
Imports System.Data.SqlClient
'Ahora en el LOAD, haces lo siguiente
Dim CONEXION As New SqlConnection("AQUI TU CADENA DE CONEXION")
Dim ds As New DataSet
Dim da As New SqlDataAdapter("AQUI TU CONSULTA", CONEXION)
CONEXION.Open()
da.Fill(ds, "Tabla")
CONEXIONClose()
COMBOBOX1.DATASOURCE = DS.TABLES("TABLA").DEFAULTVIEW
COMBOBOX1.VALUEMEMBER = "AQUI TU COLUMNA QUE CONTIENE EL CODIGO Y SE GUARDARA INTERNAMENTE"
COMBOBOX1.DISPLAYMEMBER = "AQUI TU COLUMNA QUE VERA EL USUARIO"
Espero haber podido ayudarte en algo, no se como funciona este foro, pero si no me notifica a mi correo me escribes
[email protected]
Saludos
Raul Torres