以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  逻辑列的DoubleClick事件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60170)

--  作者:wjl-se
--  发布时间:2014/11/19 15:43:00
--  逻辑列的DoubleClick事件

意图:双击逻辑列才能改变值

 

设计:第二列为"逻辑型",并锁定该列,DoubleClick事件代码:

 

If e.Col.Name = "第二列"  Then
    If e.Row("第二列") = False Then
        e.Row("第二列") = True
    Else
        e.Row("第二列") = False
    End If
End If

 

好处:这样可以避免单击改变逻辑,一定程度上避免误操作

 

问题:当项目处于“查阅模式”时,仍然会响应这个事件,如何解决?


--  作者:Bin
--  发布时间:2014/11/19 15:46:00
--  
If e.Col.Name = "第二列" andalso e.table.AllowEdit Then
    If e.Row("第二列") = False Then
        e.Row("第二列") = True
    Else
        e.Row("第二列") = False
    End If
End If
--  作者:有点甜
--  发布时间:2014/11/19 15:46:00
--  
If e.Table.AllowEdit Then
    If e.Col.Name = "第二列"  Then
        If e.Row("第二列") = False Then
            e.Row("第二列") = True
        Else
            e.Row("第二列") = False
        End If
    End If
End If

--  作者:wjl-se
--  发布时间:2014/11/19 15:56:00
--  

哦,明白了,谢谢二位版主!