Base de datos en textbox

[carlosanpy]

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