设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2180|回复: 9
打印 上一主题 下一主题

[宏/菜单/工具栏] 如何实现这样的一键化(快捷键)功能?

[复制链接]
跳转到指定楼层
1#
发表于 2010-2-25 21:08:28 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
只按一次一个键或一个组合键就实现一个功能(比如清除一个临时表的功能),注意:难点在于不论Access程序哪一个窗体处于激活状态,都能实现这个功能,当初想到把命令放在菜单栏上,但我的程序中有较多的弹出式窗体就不适用了,这种功能类似于Alt+F4那样,不管哪种窗体处于激活,按此组合键都能实现关闭或退出效果,期待高手解答!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2010-2-25 21:16:09 | 只看该作者
本帖最后由 todaynew 于 2010-2-25 21:30 编辑

清除一个临时表与窗体似乎没什么关系吧?通常可以在进入系统或退出系统时做删除临时表的动作。
3#
 楼主| 发表于 2010-2-26 00:19:32 | 只看该作者
不是这个意思哦,我只是打个比方,其实是公司最近与税务闹得关系紧张,怕查帐找错,所以要设计一个一键化功能,即按一个键就清除所有数据库中的数据(先把原数据库文件备份后隐秘地在一键化功能中换个名称和随意一个不正规的后缀名,说明:文件名换名称我会,就是不能做到那样的一键化操作功能按钮[须在任何激活的窗体模块中都能实现,包括弹出式窗体]
4#
发表于 2010-2-26 11:58:48 | 只看该作者
要清空的表与打开的窗体有关系?
那就循环forms,如果某个form处于打开或激活状态,然后清空指定的表
5#
发表于 2010-2-26 12:14:49 | 只看该作者
本帖最后由 todaynew 于 2010-2-26 12:18 编辑

xryacc2 同志:

  所提事项事涉国家税收,还需要给你宣传一下政策。依法纳税是公民和企业的义务,希望你们能认真执行税法,完成纳税义务。如果税务部门有意刁难,可通过其上级主管部门或行政诉讼方式解决,不宜采取不当措施。

  政策宣传完后,仅从Access技术角度,提供以下解决思路:

  Access中有一个特殊的宏,其名称为AutoKeys。该宏能实现响应按键的功能,具体说明于帮助框中输入“将操作或操作集指派给某个键”后查询。

  所附实例中,于AutoKeys中写了两个操作,其一是用Ctrl+O键打开窗体1,其二是用Ctrl+C键关闭窗体1。

  关于你所希望删除临时表或更换临时表名称的功能,可仿此例用RunCode或RunMacro操作,具体实现方法请自行解决。

                                            吸烟老汉  顿首

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
6#
 楼主| 发表于 2010-2-26 15:54:29 | 只看该作者
非常感谢todaynew 同志,通过runcode完全可以达到效果,太感谢你了。
另外,作为中国公民,我也是税收后的受惠国民之一,一定会守法的,郑重声明:所有获知此功能用法的网友,千万不可方便违法行为。
另外,也感谢aslxt 同志,你提供的方法也是可行的,只要把事件写在一个窗体模块中,循环到这个名称的窗体时,就执行自定义的代码也是可行的。
7#
发表于 2010-2-26 15:56:59 | 只看该作者
非常感谢todaynew 同志,通过runcode完全可以达到效果,太感谢你了。
另外,作为中国公民,我也是税收后的受惠国民之一,一定会守法的,郑重声明:所有获知此功能用法的网友,千万不可方便违法行为。
另外,也感谢 ...
xryacc2 发表于 2010-2-26 15:54

知错即改就是好同志,呵呵。
8#
发表于 2010-2-27 10:24:34 | 只看该作者
9#
发表于 2010-3-3 13:56:12 | 只看该作者
呵呵~
10#
发表于 2010-3-3 19:32:40 | 只看该作者
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-12-2 23:39 , Processed in 0.101282 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表