以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动显示当前日期  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86648)
--  作者：张子俊
--  发布时间：2016/6/22 16:08:00
--  自动显示当前日期
在一个表中如果已付款列是一个逻辑列，已勾选。结算日期列能否自动显示当前日期。
--  作者：大红袍
--  发布时间：2016/6/22 16:11:00
--  

If e.DataCol.Name = "已付款" Then
    If e.NewValue = True Then
        e.DataRow("结算日期") = Date.today
    Else
        e.DataRow("结算日期") = Nothing
    End If
End If