求教高手 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我有两个表格，销售单和采购单，两个都使用了同一个添加货品窗口，我现在的代码双击后无法添加商品内容到各自的销售单或采购单中，求帮助

代码如下：

If e.Col.name = "销售单" Then

Vars("销售出库主表.订单明细表") = e.Table.Name

Tables("销售出库主表.订单明细表").Current("货品ID") = e.Table.Current("ID")

Else

If e.Col.name = "采购单" Then

Vars("采购入库主表.采购明细") = e.Table.Name

Tables("采购入库主表.采购明细").Current("货品ID") = e.Table.Current("ID")

End If

Forms("添加货品").Close

主题：求教高手