Office中国论坛/Access中国论坛 › Access中国门户旧版 ›Access› 查询视图 › 查看内容

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

1970-1-1 08:00| 发布者: Dev Ashish| 查看: 1964| 评论: 0

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

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

收藏分享邀请

帐号		自动登录	找回密码
密码			注册

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

最新评论

相关分类