Dim cur_row As Integer
cur_row = DataGrid2.CurrentCell.RowNumber
Dim cur_item As Integer
cur_item = DataGrid2.Item(cur_row, 0)
msgbox(cur_item)
Dim sqlstr As String
sqlstr = "select * from 成绩表 where 编号='& cur_item &'"
DataGrid3.DataSource = redset(sqlstr, "成绩表").Tables("成绩表")
如果我把sqlstr = "select * from 成绩表 where 编号='& cur_item &'"写成sqlstr = "select * from 成绩表"程序正常执行
而且cur_item有值
请问sqlstr = "select * from 成绩表 where 编号='& cur_item &'"有什么错误应该怎么写

sqlstr = "select * from 成绩表 where 编号='"& cur_item &"'"

谢谢
我刚才试了
问题就出在这儿