在使用一个长整型变量进行查询时报错类型不匹配
Private Sub Command1_Click()
Dim x As Long
x = 80

Adodc1.RecordSource = "select 姓名 from 成绩表 where 课程成绩='" + x + "'"
Adodc1.Refresh: Set MSHF1.DataSource = Adodc1
End Sub
不知道错在什么地方？？？

"select 姓名 from 成绩表 where 课程成绩='" & x & "'"

或者
"select 姓名 from 成绩表 where 课程成绩='" + str(x) + "'"

[此贴子已经被作者于2007-9-10 15:21:27编辑过]

我试了N多次，楼上的方法没有效果
还是我的Access设置有问题？？
顺便说明一下Access中“成绩表.课程成绩”数据类型为长整型

[此贴子已经被作者于2007-9-10 19:06:09编辑过]

Dim x As Long
上面錯了。。
將x設置為小數型。。。。

[此贴子已经被作者于2007-9-10 18:47:05编辑过]

我将X设成Single、Double、Currency都不行

你數據庫中是什麼類型 就設置什麼類型。。。。用不著每個都去試。。。
select 姓名 from 成绩表 where 课程成绩="& x &"
這裡應該沒語法錯誤。。。這樣看下。。

Access中“成绩表.课程成绩”数据类型为长整型
x 设置为 long 不对吗？

你不說怎麼會知道你的數據庫中用的是長整型。。。

"select 姓名 from 成绩表 where 课程成绩=" & x & "
調試一下。。得出這條語句在立即窗口的值，將其放入後台運行。。。看一下有沒有錯。。。
沒錯就不是這條語句錯了。。而是別處錯了。。。

这两条我都测试通过 你再查其他的 vb里的SQL语句都是string, 你定义为long 也白费

你用 string + long + string 当然类型不匹配, string & long & string 倒可以