再问 sql 中使用变量的问题

Question

貌似是一个被人问过的问题， 但是我跑不同， 不知道错在那里：Private Sub HScroll1_Change()Dim rsp As New ADODB.Recordset
Dim leadernum As Integer
Set con = sqlconection()
leadernum = 18 - HScroll1.Value
rs.Open "select  *  from  actors  where ID= " & leadernum & "", con, adOpenDynamic, adLockOptimistic, adCmdText...End Sub
程序运行后报错：实时错误“424”，要求对象leadernum 这个变量在sql 中格式对么？如果不对，应该怎么写？
另外， 我在外部用模块声明了全局的connection, 不知道是不是那里错了。

Answer 1

请确认表名及字段名是否存在，con是否与数据库建立连接
字符型变量的引用：" select * from talbename where 字段='"& 字符型变量名 &"'"
数值型变量的引用：" select * from tablename where 字段=" & 数值型变量名 &" "

Answer 2

 看看代码吧，你明明定义的是rsp,但是却要打开rs 
当然告诉你没有对象了Private   Sub   HScroll1_Change()Dim   rsp   As   New   ADODB.Recordset
Dim   leadernum   As   Integer
Set   con   =   sqlconection()
leadernum   =   18   -   HScroll1.Value
rs.Open   "select     *     from     actors     where   ID=   "   &   leadernum   &   "",   con,   adOpenDynamic,   adLockOptimistic,   adCmdText...End   Sub