怎样从数据库读出数据，显示到textbox中？该怎么处理

怎样从数据库读出数据，显示到textbox中？？？
例如，学生学号Stuid（tbox1）为主键，根据学号11查询其基本信息（姓名tbox2，性别tbox3等），怎样才能将其对应数据显示到对应的文本框中？？？

------解决方案--------------------
Imports System.Data
Imports System.Data.OleDb

Public Class Form1

Dim conn As OleDbConnection
Dim da As OleDbDataAdapter
Dim ds As DataSet

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
conn = New OleDbConnection( "您的连接词 ")
conn.Open()
da = New OleDbDataAdapter( "SELECT * FROM 表名 WHERE Suid= ' " & tbox1.Text & " ' ", conn)
ds = New DataSet
If da.Fill(ds) Then
tbox2.Text = ds.Tables(0).Rows(0)( "姓名 ")
tbox3.Text = ds.Tables(0).Rows(0)( "性别 ")
Else
MsgBox( "未找到记录 ")
End If
conn.Close()
End Sub
End Class
------解决方案--------------------
和我初学时有得一拼。