Hola a todos
Estoy trabajando en este formulario y ya logré conectar una base de datos a un combo, lo que no logro es mostrar en un textbox ya que aparentemente no posee la propiedad datasource.
alguien puede darme una mano por favor
Saludos
Imports System.Data.OleDb
Imports System.Data.DataRow
Public Class frmBase
Private MiConexion As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=|DataDirectory|\Costo.mdb")
'Materiales
Private MiAdaptadorMat As New OleDbDataAdapter("SELECT * FROM precios WHERE COS_MATMDO = 'MAT' ORDER BY COS_DESCR", MiConexion)
Private MiDataSetMat As New DataSet()
Private MiEnlazadorMat As New BindingSource
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim commandbuilderMat As New OleDb.OleDbCommandBuilder(Me.MiAdaptadorMat) 'Materiales
MiConexion.Open() 'Abrimos la base de datos
MiAdaptadorMat.Fill(MiDataSetMat) 'Materiales
MiEnlazadorMat.DataSource = MiDataSetMat.Tables(0)
Me.Combo1.DataSource = MiEnlazadorMat
Me.Combo1.DisplayMember = "COS_DESCR"
End Sub
End Class
