我的VISUAL STUDIO的代码哪里错了?

来源：百度知道 编辑：UC知道 时间：2024/06/07 15:23:44
我想把数据库的信息显示在TEXT文本框中,看下这段代码出什么问题了.点显示后结果在文本框中显示的是"FALSE",帮我看下谢谢了~
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
cmd.CommandText = "select * from guoan"
cmd.Connection = conn
conn.Open()
Dim returnValue As Data.OleDb.OleDbDataReader

returnValue = cmd.ExecuteReader
While returnValue.Read
End While
txtguoan.Text = returnValue.Read

conn.Close()

End Sub

vb语法不太懂不过你把txtguoan.Text = returnValue.Read 放在EndWhile前试试看

conn.Open()
dim ds as new dataset
Dim TempdaDataAdapter As New SqlClient.SqlDataAdapter
Dim TempcmdCommand As New SqlClient.SqlCommand(sql, SqlConnect)
TempdaDataAdapter.Fill(ds, tblName)
me.textbox1.text= ds.tables(0).rows(0).item(0).tostring

你的cmd.CommandText = "select * from guoan"这个语句 返回的结果是一行（多列，单列）？ 是否正确或是合适啊！
还有你的while循环是否正确啊？？
因为前面的代码不知道啊!所以剩下的你自己看了啊！