以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  关于时间的处理  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78586)

--  作者：sara --  发布时间：2015/12/12 9:57:00 --  关于时间的处理 我想实现的功能是这样的：公司新产品，录入时候录入一个开始使用时间，现在时间开始算是第一个月，设置某个属性为1，以后每天判断当天距离开始时间是不是下一个月，如果是下一个月，则设置某属性是2，以此类推，我该如何写代码

--  作者：sara --  发布时间：2015/12/12 10:08:00 --   谁来解答一下呢

--  作者：Hyphen --  发布时间：2015/12/12 10:18:00 --   增加一个逻辑列，存储属性，判断代码如下 Dim dr As DataRow = DataTables("表A").Find("条件") If dr IsNot Nothing Then     Dim d As Date = dr("开始使用时间")        If d.AddMonths(1) > Date.Now Then         dr("逻辑列") = 1     End If End If