Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1855940
  • 博文数量: 354
  • 博客积分: 11021
  • 博客等级: 上将
  • 技术积分: 4048
  • 用 户 组: 普通用户
  • 注册时间: 2010-02-24 10:04
文章存档

2020年(1)

2018年(1)

2016年(1)

2015年(2)

2014年(4)

2013年(4)

2012年(12)

2011年(14)

2010年(37)

2009年(34)

2008年(22)

2007年(68)

2006年(102)

2005年(29)

2004年(21)

分类: LINUX

2007-06-16 00:53:32

正 文:

(问): 怎样使用代码打开参数查询?

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

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


阅读(1215) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~