Foxtable(狐表)用户栏目专家坐堂 → [讨论]自定义录入界面


  共有7123人关注过本帖树形打印复制链接

主题:[讨论]自定义录入界面

帅哥哟,离线,有人找我吗?
kensou11111
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:255 积分:2353 威望:0 精华:0 注册:2011/4/25 9:23:00
[讨论]自定义录入界面  发帖心情 Post By:2012/5/27 14:41:00 [只看该作者]

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

在这个自定义录入界面的案例中,

 

4、将Table控件的DoubleClick事件设置为:

Dim tbl As Table = Tables("窗口1_Table1")
If
tbl.Current IsNot Nothing Then
    Tables
("订单").Current("客户ID") = tbl.Current("客户ID")
End
If
Forms(
"窗口1"
).Close()

 

 

以上这段代码是针对单个的表的,案例中为“订单”表,但我有可能会在设计系统的多个表中用这种方式录入,那该如何修改呢?例如我目前需要在tables("订单_table1")中用这种自定义录入界面

[此贴子已经被作者于2012-5-27 15:16:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
andu
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:242 积分:1920 威望:0 精华:0 注册:2012/5/14 22:26:00
  发帖心情 Post By:2012/5/28 2:02:00 [只看该作者]

CurrentTable

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
kensou11111
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:255 积分:2353 威望:0 精华:0 注册:2011/4/25 9:23:00
  发帖心情 Post By:2012/5/28 22:40:00 [只看该作者]

以下是引用andu在2012-5-28 2:02:00的发言:

CurrentTable

 

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

 

不行的,因为表是窗口中的表,不能使用CurrentTable


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/5/29 9:06:00 [只看该作者]

没办法,采用这个方案:

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


 回到顶部