- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 帮助教程里的这个程序要怎么改？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=144137)
-- 发布时间：2019/12/11 20:18:00
-- 帮助教程里的这个程序要怎么改？
自定义录入界面之一的这个例子，双击被引用表的记录，引用“客户ID”到当前位置
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()
但是我设置了之后发现了两个问题：
1、我要引用多个字段，比如，除了“客户ID”要引用，还要引用“公司名称”和“联系人”怎么写？
2、这个感觉摸不着头脑，就是无论我点击哪条记录，引用的始终数第一条记录？为什么啊？？
[此贴子已经被作者于2019/12/11 21:17:57编辑过]
-- 发布时间：2019/12/12 8:54:00
--
Tables("订单").Current("客户ID") = tbl.Current("客户ID")
Tables("订单").Current("公司名称") = tbl.Current("公司名称")
如果双击的是副本表，那么就是:http://www.foxtable.com/webhelp/topics/1906.htm
Tables("窗口n_table1").Current("客户ID") = tbl.Current("客户ID")
Tables("窗口n_table1").Current("公司名称") = tbl.Current("公司名称")
-- 发布时间：2019/12/12 12:14:00
--
以下是引用有点蓝在2019/12/12 8:54:00的发言：
Tables("订单").Current("客户ID") = tbl.Current("客户ID")
Tables("订单").Current("客户ID") = tbl.Current("客户ID")
Tables("订单").Current("公司名称") = tbl.Current("公司名称")
如果双击的是副本表，那么就是:http://www.foxtable.com/webhelp/topics/1906.htm
Tables("窗口n_table1").Current("客户ID") = tbl.Current("客户ID")
Tables("窗口n_table1").Current("公司名称") = tbl.Current("公司名称")
-----------------------------------------------------------------------
明白了！谢谢蓝老师！原来current后面的变量不能用分隔符连续定义多个变量的..........我也找过关于current的函数定义，没找到。原来是要把代码重复抄就对了。