VB用data控件连接access数据库，要求用sql语句查询，求高手纠错，详细如下

data控件的connect等属性已经设好无误，数据库内的表名字段名也是和sql语句相应的，但是总是对不了……语句如下

Private Sub Command1_Click()
Dim sql As String
Dim x As String
x = InputBox("请输入学号", "查询")
sql = "select * from 课程成绩 where 学号='" & x & "'"
Data1.DatabaseName = App.Path + "\exp2datasource.mdb"
Data1.RecordSource = sql
Data1.Refresh
End Sub

每次输入完数据库表中已经存在的一个学号就出现
数据库引擎找不到'select * from 课程成绩 where 学号='" & x & "''    我疑惑了，求高手不吝赐教，纠错……

答案：你看看你的sql中，输入select * from 课程成绩 where 学号=(input的内容)。sql是否能正确查询出来。不一定是你vb的问题。如果你学号设置在sql中为数据的话，查询时不用‘’的。

其他："select * from 课程成绩 where 学号=" + x x = InputBox("请输入学号", "查询")
如果是字符类型 ，也要去一下空格，用去空格函数trim(x). 

上一个：怎样用C或C++（最好是C）语言向Access数据库写入或读出数据？
下一个：跪求数据库ACCESS职工工资管理系统的课程设计