两个并列窗口 都用到了客户选择 ,结果选择客户的时候 出错了, 客户选择窗口按钮代码是
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
不同时打开没有问题
如何解决这个问题呢 求教