以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口录入问题。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52948)

--  作者:ccbbdlzj
--  发布时间:2014/6/26 10:09:00
--  窗口录入问题。
窗口中有若干录入控件,不是每个都需要录入,想在录入中途中断,比如只录入第一、第二个数据后,结束录入,直接执行“新增”控件,想加一个快捷键实现,咋整?
--  作者:有点甜
--  发布时间:2014/6/26 10:31:00
--  

 可以看一下这里,全局快捷键地址 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52509&replyID=&skin=1

 


--  作者:有点甜
--  发布时间:2014/6/26 10:32:00
--  

 或者编写表的事件keydown,写入触发的代码

 

http://www.foxtable.com/help/topics/0741.htm

 


--  作者:ccbbdlzj
--  发布时间:2014/6/26 14:52:00
--  
麻烦您写一下代码好吗?谢了!
--  作者:有点甜
--  发布时间:2014/6/26 14:57:00
--  
以下是引用ccbbdlzj在2014-6-26 14:52:00的发言:
麻烦您写一下代码好吗?谢了!

 

呃,请先参考链接学习一下,或者请上传例子。


--  作者:ccbbdlzj
--  发布时间:2014/6/26 15:03:00
--  
这个例子,想在录入中途,转向“新增”按钮。
--  作者:有点甜
--  发布时间:2014/6/26 15:09:00
--  
以下是引用ccbbdlzj在2014-6-26 15:03:00的发言:
这个例子,想在录入中途,转向“新增”按钮。

 

可以直接在代码那里实现新增按钮的功能。

 

如果是转向新增按钮,这样写 Forms("窗口1").Controls("Button1").Select


--  作者:ccbbdlzj
--  发布时间:2014/6/26 15:11:00
--  

这个例子.

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗口录入.foxdb


--  作者:有点甜
--  发布时间:2014/6/26 15:19:00
--  

 

 代码

 

If e.Control = True And e.Alt = True AndAlso e.KeyCode = Keys.Q Then
    e.Form.Controls("新增").Select
End If

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗口录入.foxdb


--  作者:ccbbdlzj
--  发布时间:2014/6/26 15:24:00
--  

成了!非常感谢!