Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共9 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:自定义录入界面关闭后焦点问题(已解决)

1楼
i52117 发表于:2010/5/27 15:29:00
帮助中有个  自定义录入界面 的例子 回车选择   窗口关闭后(此时界面为当前表) 按回车、上下键(任何键)无反应 需在窗口点击鼠标  可否在窗口的Afterclose 事件中加入代码解决 怎么写?谢谢
[此贴子已经被作者于2010-5-27 15:48:28编辑过]
2楼
i52117 发表于:2010/5/27 15:32:00

顺便发现个错误:

 


图片点击可在新窗口打开查看此主题相关图片如下:after.jpg
图片点击可在新窗口打开查看
3楼
czy 发表于:2010/5/27 15:33:00

加上这句代码

 

CurrentTable.Focus

如果是窗口的Table控件,就是Tables("窗口_Table").Focus

[此贴子已经被作者于2010-5-27 15:34:30编辑过]
4楼
i52117 发表于:2010/5/27 15:35:00
谢谢C版主 试过了 Focus  和 select  都不行
5楼
czy 发表于:2010/5/27 15:36:00

不会吧?

传例子看看。

6楼
狐狸爸爸 发表于:2010/5/27 15:37:00

2楼问题收到,我处理。

焦点问题大家研究

7楼
i52117 发表于:2010/5/27 15:40:00

窗口在 出库明细 中

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

[此贴子已经被作者于2010-5-27 15:39:42编辑过]
8楼
czy 发表于:2010/5/27 15:44:00
'Table控件DoubleClick事件
Dim tbl As Table = Tables("窗口4_Table1")
Tables("出库明细").Current("备注") = tbl.Current("姓名")
Forms("窗口4").Close()
Tables("出库明细").Focus
9楼
i52117 发表于:2010/5/27 15:48:00
czy 版主果然高手 解决了   多谢!
共9 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03516 s, 3 queries.