主题：两个并列窗口 都用到了客户选择 ，结果选择客户的时候 出错了

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

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"

我在打开并列窗口订单录入的afterload 事件里 openform="订单录入"  openform 是全局变量

 打开选择窗口之前啊，你不是要点一个按钮，才打开选择窗口的么。

是的

并列窗口 只要切换就可以了