Office中国论坛/Access中国论坛

标题: 点菜单按钮直接录入文字的方法！ [打印本页]

作者: xulanghui 时间: 2004-8-1 18:50
标题: 点菜单按钮直接录入文字的方法！
各位大虾，这个问题经过一番摸索终于搞掂。方法是建一个宏，取SendKeys命令，在下面键击中录入文字，然后做个自定义菜单，宏拖至菜单上即可。

新问题：如何才能让录入文字后光标自动转为下一字段呢？宏里好像没有此功能。

作者: 老鬼 时间: 2004-8-2 06:29
用GOTORECORD可以实现你的要求。

作者: xulanghui 时间: 2004-8-2 16:36
谢谢楼上的，只可惜GOTORECORD只能进行记录间的跳转，而我是要在同一条记录中，转至下一字段，有好方法吗？

作者: zoe_yi 时间: 2004-8-5 00:54
你的水平还不如我呢[em06]

作者: xulanghui 时间: 2004-8-5 01:39
谢谢楼上的直言，呵呵，我还以为你的要求是那么回事呢！至于水平嘛，我不再边学边练喽！

作者: chinawin 时间: 2004-8-6 01:10
[em01]关于新问题，为什么那么麻烦，回车不可以吗？

作者: 老鬼 时间: 2004-8-6 03:37
那用GOTOCONTROL啊，基本上VBA能做到的一般功能，宏都能做到。

作者: xulanghui 时间: 2004-8-6 04:27
标题: GOTOCONTROL好像用不上呢？
[attach]5916[/attach]

因为点了菜单按钮后，就要开始填数量，如果能点完就自动有个回车信息，那就直接输数量行了（想更方便喽）。

我在想可否点击输如382以后，过1秒钟光标自动转到下一字段，那也一样实现了，可我又不知怎样做。

作者: xulanghui 时间: 2004-8-6 17:59
经过sweetduck版主指点，最终完成，在子窗体/工程量代码的键释放中加入以下代码：Private Sub 工程量代码_KeyUp(KeyCode As Integer, Shift As Integer)

Static intKnm As Integer

intKnm = intKnm + 1

If intKnm = 3 Then

SendKeys "{ENTER}"

intKnm = 0

End If

End Sub再次感谢各网友及版主！另sweetduck版主也有个网站，建议去看看（http://asp5.6to23.com/u2me/welcome.asp）精彩不容错过[em01][em01]

作者: longerth123 时间: 2006-1-22 18:56
受教了

作者: flyerouly 时间: 2006-1-22 22:06
厉害啊

作者: sojyang 时间: 2006-2-13 21:23
受益了！

作者: wb111666 时间: 2006-4-6 05:08
以下为单独分离出来的剪贴板访问公共模块，包含复制文本到剪贴板，从剪贴板读取文本，完全备份剪贴板数据，恢复剪贴板数据四个公共函数。由Terry Kreft开发，LucasLynn增强。

作者: babykite 时间: 2006-11-11 08:16
多谢分享

作者: snddzxb 时间: 2008-4-12 14:58
好好学习

作者: 67613188 时间: 2008-5-9 12:41
标题: 哎
简直就是垃圾

作者: zjj5452 时间: 2008-5-9 21:30
标题: hhhhhhhhhhhhhhhh
hhhhhhhhhhhh

作者: robotax 时间: 2008-5-13 09:03
谢谢[:33] [:33]

作者: huangyicai 时间: 2008-5-20 17:30
标题: 回复 1# 的帖子
好的，受教呀

作者: ajunqqw123 时间: 2008-6-12 17:16
嗯.....正好学习了~>.................感谢楼主的分享了>~!

作者: ABCaccess 时间: 2008-6-14 20:51
如何修改调整ACCESS的系统菜单?

作者: sunwrsun 时间: 2008-7-20 11:43
直接录入

作者: bjzlx 时间: 2008-7-26 00:43
楼主辛苦了,下来学习学习[:50]

作者: fsyowen168 时间: 2011-11-21 00:14
下来学习一下

作者: bpchan 时间: 2011-11-26 14:18
学习！！

作者: ruanjy 时间: 2011-11-27 10:57
索终于搞掂

作者: wdq 时间: 2011-11-28 02:16
{:soso_e100:}

作者: cs423 时间: 2012-3-3 21:46
史蒂芬森电风扇地方

作者: zhu320211 时间: 2012-5-2 16:39
看看程序

作者: accesswj 时间: 2012-5-2 17:14
okokkokoko

作者: mfkgy2000 时间: 2013-8-1 12:44
kkkkkkkkkkkkkkk

作者: jzbinbin5 时间: 2013-11-5 23:26
dddddddddddddddddddd

作者: 雪山一支蒿 时间: 2016-3-22 18:43

谢谢分享！

作者: 雪山一支蒿 时间: 2016-3-22 18:43
金币不够耶

作者: 雪山一支蒿 时间: 2016-3-22 18:43
获取金币下载喔!

作者: 雪山一支蒿 时间: 2016-3-22 18:45
2个金币不值耶

作者: 硕龙陆哥 时间: 2016-3-23 18:45
谢谢分享

作者: voilv 时间: 2016-3-23 22:13
看看

作者: ardu95 时间: 2016-10-31 06:49
自动连续编号

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)