主题：如何取消解锁

这样可以吗，麻烦你了，老师、

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

谢谢老师

弱弱地问一句，可以设置成一点击那个审核的控件，把发货单整个整个窗口的内容都审核，现在只能审核表发货单的内容，窗口绑定 发货单.发货明细表 的内容没有被审核。

DataColChanged事件

 

If e.DataCol.Name = "已审核" Then
    e.DataRow.Locked = e.NewValue
    If Forms("发货1").opened Then
        Forms("发货1").Controls("已审核").checked = e.DataRow("已审核")
    End If
    Dim filter As String = "订单编号 = '" & e.DataRow("订单编号") & "' and 加工厂 = '" & e.DataRow("加工厂") & "'"
    DataTables("发货明细表").ReplaceFor("_Locked", e.NewValue, filter)
End If

谢谢