一个变量查询问题?
在使用一个长整型变量进行查询时报错类型不匹配
Private Sub Command1_Click()
Dim x As Long
x = 80
Adodc1.RecordSource = "select 姓名 from 成绩表 where 课程成绩='" + x + "'"
Adodc1.Refresh: Set MSHF1.DataSource = Adodc1
End Sub
不知道错在什么地方???
在使用一个长整型变量进行查询时报错类型不匹配
Private Sub Command1_Click()
Dim x As Long
x = 80
Adodc1.RecordSource = "select 姓名 from 成绩表 where 课程成绩='" + x + "'"
Adodc1.Refresh: Set MSHF1.DataSource = Adodc1
End Sub
不知道错在什么地方???
[此贴子已经被作者于2007-9-10 19:06:09编辑过]
解决了
Private Sub Command1_Click()
x = 80
Adodc1.RecordSource = "select 姓名 from 成绩表 where 课程成绩=" & x
Adodc1.Refresh: Set MSHF1.DataSource = Adodc1
End Sub