·一周点击排行
·热点推荐
怎么通过代码打开一个参数查询
发布时间：2008-5-28 17:11:00 浏览次数: 244
为了打开参数查询, 你须要明确指出基于参数查询打开记录集的每一个参数.
例如, 在下面的代码中, 查询 "Qry1" 拥有两个参数: [Please enter Code:] 和 [Please enter city:].
Dim db As Database ' 当前数据库
Dim rs As Recordset ' 保存查询结果的记录集
Dim qdfParmQry As QueryDef ' 实际的查询对象
Set db = CurrentDb()
Set qdfParmQry = db.QueryDefs("Qry1")
qdfParmQry("Please Enter Code:") = 3
' or try this alternate method
' to pass the parameter
qdfParmQry![Please Enter City:] = "New York"
Set rs = qdfParmQry.OpenRecordset()
讨论此主题请进>>: 怎么通过代码打开一个参数查询