VB中怎么调用Access中写好的查询？

Question

在Access中写好一查询名为：查询1
在VB中调用这个查询的方法是
'-----------------------
dim rs as adoddb.recordsetset rs=new adodb.recordset
rs.open "查询1",rn
'----------------------
我想问的是如果这个查询有参数是个参数查询，在VB中该怎么调用呢？怎么把值传给参数呢？谢谢

Answer 1

dim sSql as string
    sSql="查询1"rs.open "查询1",rn

Answer 2

在VB中重新写一遍查询,定义成字符串,然后把参数的地方代成变量!不一定非用在ACCESS中写好的查询表吧?

Answer 3

当然不是非要在Access中写好查询调用，只是想掌握这种技术。
第一楼的根本没懂我的意思，第二楼的没有真正回答我提出的问题，所以都不能给分。请原谅！
继续等待。。

Answer 4

参数：如果是数字，直接写，如
  dim N as long
  dim sql as string
  N=100
  sql ="SELECT * FROM table1 "
  sql=sql & "WHERE id <=" & N & ";"如果是字符串，如
  dim str as string
  str="ABC"
  sql ="SELECT * FROM table1 "
  sql=sql & "WHERE name LIKE '%" & str & "%';"查出名称字段中包含“ABC”的所有记录!如果是时间，前后加#号
  sql=sql & "WHERE name = '#" & date & "#';"

Answer 5

在Access中写好一查询名为：查询1
在VB中调用这个查询的方法是
'-----------------------
dim rs as adoddb.recordsetset rs=new adodb.recordset
rs.open "查询1'" & 参数1 & "'" ,rn
'----------------------