以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  我希望当逻辑列被勾选时,另一列自动记录时间,可每次新增行时会自动填入时间,这不是我想要的,我是哪里写错了?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55208)

--  作者:jinxilin
--  发布时间:2014/8/12 17:45:00
--  我希望当逻辑列被勾选时,另一列自动记录时间,可每次新增行时会自动填入时间,这不是我想要的,我是哪里写错了?
我希望当逻辑列被勾选时,另一列自动记录时间,

可每次新增行时会自动填入时间,这不是我想要的,

表事件内写入如下代码

Select Case e.DataCol.Name
    Case "是否完成"
        If e.DataRow.IsNull("是否完成") = 0 Then
            e.DataRow("完成时间") = Date.now()   
        Else
            e.DataRow("完成时间") = ""
        End If
End Select


我是哪里写错了?


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20140812174030.jpg
图片点击可在新窗口打开查看



[此贴子已经被作者于2014-8-12 17:45:40编辑过]

--  作者:czy
--  发布时间:2014/8/12 17:50:00
--  

应该这样吧?

 

Select Case e.DataCol.Name
    Case "是否完成"
        If e.DataRow("是否完成") = True Then
            e.DataRow("完成时间") = Date.now()  
        Else
            e.DataRow("完成时间") = Nothing
        End If
End Select


--  作者:有点甜
--  发布时间:2014/8/12 17:51:00
--  
\'下面代码:当是评价了,则在评价日期列写入当前时间\'
Select Case e.DataCol.Name
    Case "是否完成"
        If e.DataRow("是否完成") = True Then
            e.DataRow("完成时间") = Date.now()  
        Else
            e.DataRow("完成时间") = Nothing
        End If
End Select

--  作者:Bin
--  发布时间:2014/8/12 17:51:00
--  
Select Case e.DataCol.Name
    Case "是否完成"
        
        If e.DataRow("是否完成")  Then
            e.DataRow("完成时间") = Date.now()   
        Else
            e.DataRow("完成时间") = nothing
        End If
End Select

--  作者:jijianjsj
--  发布时间:2014/8/12 17:52:00
--  
IsNull,‘是否完成’是逻辑列?
[此贴子已经被作者于2014-8-12 17:54:18编辑过]

--  作者:jinxilin
--  发布时间:2014/8/12 18:02:00
--  
谢谢大家 ,已经解决了。  是 True 和 nothing 的问题,学习了。