在select语句中使用带参数的存储过程
我遇到了这么一个问题  
在select语句中使用带参数的存储过程,怎样将参数传入

------解决方案--------------------
使用的是ACCESS的数据库,使用ADO.COMMAND.EXECUTE方法,COMMAND.COMMANDTEXT使用的是参数话的sql语句,程序如下:
Private Const QRY_CODE_SEL1 = "QRY_DEPT_SELECT1 "
Sub test()
'**DB USE**
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmd As New ADODB.Command

Set con = CurrentProject.Connection
cmd.ActiveConnection = con
cmd.CommandText = QRY_DEPT_SEL1
cmd.CommandType = adCmdStoredProc
Set rs = cmd.Execute(, Parameters:=Array( "2000/05/05 ", "01 "))
MsgBox rs.RecordCount
MsgBox rs.Fields( "部门名称 ").Value
End Sub


其中参数化的sql语句是这样写的:(即QRY_DEPT_SELECT1)
SELECT *
FROM TBL_DEPT
WHERE 建立年月=[?] And 部门编号=[?];

后台的表TBL_DEPT,结构是:
建立年月 时间日期类型
部门编号 字符串
部门名称 字符串