这个代码没有任何意义。首先if语句是永远不会执行的，其次BeforeLoadOuterTable事件还没有加载表，也不存在任何table和窗口，更不用说窗口表的某一行了。
可以试试：
BeforeLoadOuterTable加了如下代码：
Select Case e.DataTableName
Case "用户表","账套管理","账号部门","权限表"
Case "派发工序表",
e.SelectString = "Select * F rom {派发工序表} Where [_Identify] is null"
Case Else '其他所有表默认都不加载
e.Cancel = True
End Select
afteropenproject事件
forms("分派工序").open
"分派工序"table2窗口表currentchanged事件：
if e.table.current isnot nothing
datatables("派发工序表").loadfilter = "订单号='" & e.table.current("订单号") & "'"
datatables("派发工序表").load
end if
加好友 
发短信
Post By：2019/6/17 21:52:00 [显示全部帖子]
