数据库中的数据如何显示在textbox中

[aclaner]

本人刚学vb.net，也看过以前的帖子，但是仍然不知我的代码怎样改？我写的代码为:
Dim a As String = Me.TextBox1.Text
数据库路径
con.Open()
Dim cmd1 As New SqlCommand("select btypename from booktype where btypeno=" & Me.TextBox1.Text, con)
Me.TextBox2.Text = cmd1.ToString()
con.Close()
恳请高人指点！谢谢！

[aclaner]

问题解决了~

[Fibona]

Dim a As String = Me.TextBox1.Text
数据库路径
con.Open()
Dim cmd1 As New SqlCommand("select btypename from booktype where btypeno=" & Me.TextBox1.Text, con)

Dim SqlDataReader sda=cmd1.ExcuteReader();

Me.TextBox2.Text = sda["btypename"].ToString()
con.Close()

[wadialin]

晕，

[hhxxcj]

直接读出数据拼成字符串，再赋值就行了