以文本方式查看主题

-  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=53561)

--  作者:821117
--  发布时间:2014/7/10 17:34:00
--  [求助]根据一列日期自动填写另一列日期的代码求助
各位高手,请教一下通过已有的一列日期列自动填写另外一列日期列代码怎么写呢?另外一列需自动增加两个月,比如已有列为2014.07.10,那自动填写的那一列就是2014.09.10。
我只了解到了在事件中的DataColChanged编写具体怎么写一直都有错误摸不着头脑。感谢各位高手给个代码,感谢!

--  作者:有点甜
--  发布时间:2014/7/10 17:37:00
--  
If e.DataCol.name = "日期1" Then
   If e.DataRow.Isnull("日期1") = False Then
        e.DataRow("日期2") = e.DataRow("日期1").AddMonths(2)
    End If
End If

--  作者:821117
--  发布时间:2014/7/10 18:52:00
--  
感谢版主!!