access VBA教程:来自窗体上控件的日期与时间条件-网行者
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


access VBA教程:来自窗体上控件的日期与时间条件

发表时间:2012/4/7 22:07:22 评论(1) 浏览(11924)  评论 | 加入收藏 | 复制
   
摘 要:来自窗体上控件的日期与时间条件
正 文:

如果要根据用户的决定来更改运算的 criteria参数,可以指定来自窗体上控件的条件。例如,可以指定来自“订单”表中含有订单日期的列表框控件的 criteria参数。

若要指定来自窗体上控件的日期与时间条件,可以在 criteria参数中包含引用该控件的表达式。该表达式应该和字符串表达式分开,这样 Microsoft Access 在执行相应运算之前将首先计算控件的表达式,并将它和字符串表达式的其余部分相连接。

除了要将整个字符串表达式括在双引号 (") 中以外,还必须确保字符串表达式中的日期或时间条件括在数字符号 (#) 中。数字符号必须位于引用窗体上控件的表达式两侧的字符串中。

注意   数字符号用于向 Microsoft Access 标明 criteria参数在字符串中包含了日期或时间。

下面的示例根据来自窗体上名为“雇用日期”控件的条件来设置窗体的 Filter 或 ServerFilter属性。注意数字符号的位置。

Forms!Employees.Filter = "[HireDate] >= #" _
 &     Forms!Employees!HireDate & "#"
Forms!Employees.FilterOn = True

– 或者 –

expr1 [NOT] IN (subquery)

Forms!Employees.ServerFilter = "[HireDate] >= #"& Forms!Employees!HireDate &"#"
Forms!Employees.FilterOn = True

如果 HireDate 控件的当前值为5-1-92,则“筛选”或“服务器筛选”属性将包含以下 criteria参数:

"[HireDate] >= #5-1-92#"

提示   若要解决 criteria参数中表达式的错误,最好将表达式拆分为较小的组件,并在“立即”窗口中逐个测试。当所有的组件都能正常工作时,再将它们组合在一起,直到整个表达式能够正常工作为止。

也可以在 criteria参数中包含代表日期或时间的变量。变量应该和字符串表达式分开。这样 Microsoft Access 将首先计算变量,然后再与字符串表达式的其余部分相连接。日期或时间条件必须括在数字符号中。

下面的示例显示如何构建一个 criteria参数,该参数包含代表日期或时间的变量:

Dim datHireDate As Date
datHireDate = #5-1-92#
Forms!Employees.Filter = "[HireDate] >= #"& datHireDate &"#"

Access软件网交流QQ群(群号:198465573)
 
 相关文章
Graph VBA教程  【风行  2012/4/5】
access VBA教程:在 Visual Basic 中设置窗体...  【网行者  2012/4/7】
【Access扫盲知识】日期时间相减得出年数,月数,季度,天数差的...  【麥田  2013/2/19】
ACCESS VBA编程(日期、时间函数)  【小英  2013/3/1】
【Access源码示例】按月份的日期区间段查询示例,开始月份至截止...  【麥田  2013/3/14】
异曲同工——使用代码解决复杂查询,查询日期补空行  【在水一方  2013/4/1】
常见问答
技术分类
相关资源
文章搜索
关于作者

网行者

文章分类

文章存档

友情链接