今天碰到一个奇怪的问题。在用户主窗口的一个table4的click事件里写了如下代码:forms("撤销详情").Open()“撤销详情”窗口设置为模式窗口,在“撤销详情”窗口的afterload里:
Dim tb As Table
Dim tr As Row
tb=forms("用户主窗口").Controls("table4").Table
tr=tb.Current
Tables("撤销详情_table1").Fill("select [订单号],[商品代码],[商品全名],[商品数量],[商品单位],[单价] from {订单详情} where 订单号='"& tr("订单号") &"' ", "joofoo", True)
当我在用户主窗口的table4上点击一个单元格后,撤销详情窗口显示了显示的数据,但是一闪就关了,也不能再操作其他,一点就咣咣想,只能在任务管理器中关掉。
请问这是怎么回事?