主题：逻辑列问题

老师，请问下，我表A有个逻辑列，我想只要在逻辑列打勾，那么打勾的行就自动会变成锁定行，如果没打勾就是正常的行，代码要怎么写，谢谢！

click事件

 

If e.Col.name = "第五列" Then
    e.Row("第五列") = not e.Row("第五列")
    e.Row.Locked = e.Row("第五列")
End If

老师，上面的代码放到click事件后，逻辑列不能打√

 

改一下

 

If e.Col.name = "第五列" Then
    If e.Row.Locked Then
        e.Row("第五列") = False
    End If
    e.Row.Locked = e.Row("第五列")
End If

If e.Col.name = "第五列" Then
    If e.Row.Locked Then
        e.Row("第五列") = False
    End If
    e.Row.Locked = e.Row("第五列")
End If

If e.Col.name = "第五列" Then
    If e.Row.Locked Then
        e.Row("第五列") = False
    End If
    e.Row.Locked = e.Row("第五列") = “审核”
End If

click事件或者doubleclick事件

 

If e.Col.name = "第五列" Then
    e.Table.StartEditing
End If

 

datarcolchanged事件

 
If e.DataCol.name = "第五列" Then
    e.DataRow.Locked = (e.DataRow("第五列") = "审核")
End If