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


  共有7192人关注过本帖平板打印复制链接

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

帅哥哟,离线,有人找我吗?
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编辑过]

 回到顶部