主题：怎样实现帮助中添加添加货品功能

1、打开窗口之前，给全局变量赋值为点击的表

vars("表名") = "表A.表B"

2、双击代码

Dim tbl As Table = Tables("窗口2_Table1")
If tbl.Current IsNot Nothing Then
    Tables(vars("表名")).Current("产品编号") = tbl.Current("商品编号")
    Tables(vars("表名")).Current("产品名称") = tbl.Current("商品名称")
    Tables(vars("表名")).Current("单价") = tbl.Current("进价")
End If
Forms("窗口2").Close()

会员消费表与会员消费明细表关联，做了一个会员消费窗口，插入关联窗体后，在里面输入商品，采用商品表录入，弹出窗体后双击商品行，加入到对应的字段，这样的代码应该怎么写，我不知道，

1、打开窗口之前，给全局变量赋值为点击的表

vars("表名") = "表A.表B"

在哪里实现，这是为什么？请指教，我才学，麻烦了！

 你肯定要写代码弹出窗口的吧，比如你写了CellButtonClick的代码，在打开之前赋值

 vars("表名") = e.Table.Name

此主题相关图片如下：qq图片20150609101507.png

总提示这窗口，我还是没做成。

我不会传，怎样传上去

http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

实现了，太谢谢您了，我学习了好几天没有想明白，菜鸟就是菜鸟，学到了东西，会发图片了，会上传文件了，再次感谢！