两个并列窗口 都用到了客户选择 ，结果选择客户的时候  出错了， 客户选择窗口按钮代码是

If Forms("订单录入").opened()
Dim tbl As Table = Tables("客户选择_table1")
If tbl.Current IsNot Nothing Then
    Tables("订单").Current("客户编号") = tbl.Current("编码")
    Tables("订单").Current("客户名称") = tbl.Current("名称")
   End If
e.form.Close()
End If
If Forms("加工订单").opened()
Dim tbl As Table = Tables("客户选择_table1")
If tbl.Current IsNot Nothing Then
    Tables("加工单").Current("客户编码") = tbl.Current("编码")
    Tables("加工单").Current("客户名称") = tbl.Current("名称")
   End If
e.form.Close()
End If

并列窗口同时打开时会出错的，如下图

此主题相关图片如下：qq图片20141216162554.jpg

不同时打开没有问题

如何解决这个问题呢 求教

1、公用一个窗口的时候，打开窗口之前，用一个变量保存是哪个窗口打开的；

2、在按钮里判断是哪个窗口，然后做对应的操作

3、提示这个错误，是因为，你e.Form.Close以后，不能再用里面的表控件啊

这个变量要用全局代码吗

2楼的第一条 怎么写代码

在按钮里写啊，点击打开选择窗口之前，赋值，比如 vars("窗口") = "窗口1"