- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 用户模式下选择数据返回 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95194)
-- 发布时间：2017/1/12 17:35:00
-- 用户模式下选择数据返回
老师你好，我下图参照了筛选树及自定义录入界面的方法，在系统模式下，可以在每一行里面选择树里面的数据，但是在用户模式下，除了第一行数据能返回外，其它行选择的数据不能返回到当前行，并且直接覆盖第一行，请指点一下，谢谢。
此主题相关图片如下：选不上.jpg
-- 发布时间：2017/1/12 17:44:00
--
1、打开窗口之前，记录窗口对象
vars("表") = e.Table
Forms("窗口1").show
2、选择返回的代码改成
vars("表").Current("商品名称") = e.Table.Current("商品名称") \'e.Row("商品名称")
-- 发布时间：2017/1/12 18:12:00
--
我在控件table的doubleclick事件加了以下代码，还是返回不了，请老师帮助看一下
Dim tbl As Table = Tables("入库单父子表目录树_Table1")
If tbl.Current IsNot Nothing Then
\'Tables("退货出库单子表").Current("商品名称") = tbl.Current("商品名称")
vars("退货出库单子表").Current("商品名称") = e.Table.Current("商品名称")
End If
Forms("入库单父子表目录树").Close()
[此贴子已经被作者于2017/1/12 18:12:44编辑过]
-- 发布时间：2017/1/12 18:15:00
--
打开窗口的按钮，必须赋值
vars("退货出库单子表") = e.Table
Forms("入库单父子表目录树").show
代码不会有问题，请认真测试。
-- 发布时间：2017/1/12 18:57:00
--
此主题相关图片如下：弹窗.jpg
谢谢老师，我删除了原先的代码，现在可以了，但是为什么返回时又要弹出一个框呢？
-- 发布时间：2017/1/12 19:37:00
--
e.cancel = true
vars("退货出库单子表") = e.Table
Forms("入库单父子表目录树").show
-- 发布时间：2017/1/13 9:42:00
--
谢谢，测试OK，ecancel.true应该放在后面吧，执行完才退出