vb.net 连接access数据库查询问题
access文件名:xsk.mdb,需要查询的表名:chengji。表有两列,学号,成绩。我在textbox1中输入学号,能在label1.text上显示textbox1...
access文件名:xsk.mdb,需要查询的表名:chengji。表有两列,学号,成绩。我在textbox1中输入学号,能在label1.text上显示textbox1学号的成绩。我自己做的这个不知为何读不出来,望大神修改
Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\xsk.mdb"
Dim myConn As OleDbConnection = New OleDbConnection(strConn)
Dim str As OleDbDataReader
Dim TestCommand As OleDbCommand = myConn.CreateCommand()
TestCommand.CommandText = "SELECT * FROM rcsbz WHERE 学号=" & TextBox1.Text
myConn.Open()
str = TestCommand.ExecuteReader()
lebel1.text=str(0)
myConn.Close()
这句是这样:TestCommand.CommandText = "SELECT * FROM chengji WHERE 学号=" & TextBox1.Text 展开
Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\xsk.mdb"
Dim myConn As OleDbConnection = New OleDbConnection(strConn)
Dim str As OleDbDataReader
Dim TestCommand As OleDbCommand = myConn.CreateCommand()
TestCommand.CommandText = "SELECT * FROM rcsbz WHERE 学号=" & TextBox1.Text
myConn.Open()
str = TestCommand.ExecuteReader()
lebel1.text=str(0)
myConn.Close()
这句是这样:TestCommand.CommandText = "SELECT * FROM chengji WHERE 学号=" & TextBox1.Text 展开
2018-03-02
展开全部
SELECT * FROM chengji WHERE 学号='" + TextBox1.Text+"'"
追问
CommandText = "SELECT * FROM chengji WHERE 学号='2854'"
还是读不上来
Label1.Text = str(0)这里报错,不存在此行/列。(2854是肯定有的)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
少写了一条语句
在 lebel1.text=str(0) 前面加上一句
str.Read()
在 lebel1.text=str(0) 前面加上一句
str.Read()
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询