关于时间的处理 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于时间的处理

共有2216人关注过本帖树形打印复制链接主题：关于时间的处理

sara

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1871 积分：12372 威望：0 精华：0 注册：2014/11/12 16:09:00

关于时间的处理 发帖心情

Post By：2015/12/12 9:57:00 [只看该作者]

我想实现的功能是这样的：公司新产品，录入时候录入一个开始使用时间，现在时间开始算是第一个月，设置某个属性为1，以后每天判断当天距离开始时间是不是下一个月，如果是下一个月，则设置某属性是2，以此类推，我该如何写代码

sara

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：八尾狐帖子：1871 积分：12372 威望：0 精华：0 注册：2014/11/12 16:09:00

Post By：2015/12/12 10:08:00 [只看该作者]

谁来解答一下呢

Hyphen

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：狐神帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00

Post By：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

主题：关于时间的处理