主题：审核锁定行

Select Case e.datacol.name
        case "审核"
            if e.NewValue = true then
                Syscmd.Row.UnLock()
            Elseif e.NewValue = false then
                Syscmd.Row.Lock()
            end if
end select