怎么通过代码打开一个参数查询_access查询-access视图-查询设计

怎么通过代码打开一个参数查询

时间：2005-01-31 15:57 来源：mvp:theaccessweb 作者：Dev Ashi… 阅读：次

为了打开参数查询, 你须要明确指出基于参数查询打开记录集的每一个参数.

例如, 在下面的代码中, 查询 "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()

(责任编辑：admin)

顶一下

(0)

踩一下

(1)

100%

上一篇：一个排名的例子
下一篇：如何实现动态查询余额