【通用工具源码】自动定位输入框的日期选择器(Access Calendar)最终版

红尘如烟 · 发表于 2010-8-3 12:18:14

本帖最后由红尘如烟于 2010-12-11 14:35 编辑

由于Access从2007版开始已经有了内置的日期选择器功能，所以此模块不再更新，但对于使用2003以更早版本的朋友还有些用处（不过这个应该更符合大家的使用习惯）。

说明：纯Access实现，不会出现任何引用问题，用于辅助日期输入，最终版彻底解决了定位问题，在普通窗体、连续窗体、数据表视图窗体中，都能够实现相对指定于输入框控件的自动适应定位。按回车键选择当前系统日期。

调用方法：将frmCalendar窗体和modCalendar模块导入到你自己开发的系统中，然后调用CalendarFor函数即可，调用方式有多种：
方式一是如图1那样做一个按钮，然后在按钮的单击事件中调用：
Private Sub cmdGetDate_Click()
CalendarFor Me.txt订购日期
End Sub

方式二是直接在文本框的单击事件中调用：
Private Sub txt订购日期_Click()
CalendarFor Me.txt订购日期
End Sub

方式三和方式二差不多，但无须写代码，而是直接把文本框的“单击”属性设为：
=CalendarFor([txt订购日期])

游客，如果您要查看本帖隐藏内容请回复

390012370 · 发表于 2024-3-20 21:18:16

看一下！先谢谢了

390012370 · 发表于 2024-3-11 15:42:39

好东西！多谢分享！

wbzheng1981 · 发表于 2021-7-5 09:04:54

很好用。再次下载

lansys · 发表于 2020-10-13 12:19:29

精品文章

平平淡淡 · 发表于 2020-4-28 16:34:04

iico · 发表于 2019-11-23 19:13:40

:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol:lol

popo559 · 发表于 2019-2-1 16:42:23

谢谢

wzfa1206 · 发表于 2018-4-16 02:29:04

自动定位输入框的日期选择器(Access Calendar)最终版 [修改]

wzfa1206 · 发表于 2018-4-16 02:28:41

00000000000000000

baiqiansheng123 · 发表于 2018-3-27 09:01:38

支持！！！！！！！！！！！！！！！！！！

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

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[其它] 【通用工具源码】自动定位输入框的日期选择器(Access Calendar)最终版

本帖子中包含更多资源

评分

群介绍
主题无相 (随机显示版	同地区群块其他地区)