功夫茶大红袍:
If e.DataCol.Name = "是否" Then
If e.NewValue = True Then
e.DataRow.Locked = True
End IfEnd If
窗体解锁
With Tables("是否") If .Current IsNot Nothing Then .Current.Locked = False End If End With
问题:解锁后,复选框的勾,该如何取消