With Tables("入库.入库明细") If .Current IsNot Nothing Then .Current.Locked = False
.Current("已审核") = False End IfEnd With