نسبت دادن یک تکست باکس به جدول

[VB.NET2005]

با سلام :
می خواستم بدونم چه طوری بدون استفاده از OLEDB میتونم مقدار یک فیلد در یک جدول رو مثلا به یک تکست باکس نسبت بدم .
من با استفاده از OLEDB میتونم ولی یک کد بدون نیاز به ایمپورت کردن و این همه کد میخام
با تشکر . . .


strcon = "Provider = microsoft.jet.OLEDB.4.0;" & "Data Source = DBase\ClassAverageDB.mdb"
strsql = "select * from Info"
con = New OleDbConnection(strcon)
con.Open()
da = New OleDbDataAdapter(strsql, con)
da.Fill(ds, "Info")
TextBox1.DataBindings.Add(New Binding("Text", ds, "Info.School"))
TextBox2.DataBindings.Add(New Binding("Text", ds, "Info.Director"))
TextBox3.DataBindings.Add(New Binding("Text", ds, "Info.Telephone"))
con.Close()

[nasseritemp]

شما میتونید DataAdapter و DataSet رو هنگام Design آماده کرده و در Propertyهای مربوط به TextBox خاصیت DataBinding رو انتخاب کرده و در قسمت Text فیلد مورد نظرتون رو Set کنید.