- 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=12662)
-- 发布时间：2011/9/10 21:52:00
-- [求助]如何自动生成有效期
就是说在表格的一列选择一个日期后,在另一列自动生成一个3个月保质期的有效日期.如何做?
-- 发布时间：2011/9/10 22:24:00
--
直接加上90，可以吗
-- 发布时间：2011/9/10 22:27:00
--
AddMonths
给日期值加上指定的月数。
语法：
AddMonths(Value)
Value: 要加上的月数，可以是负数也可以是正数。
例如：
Dim
d As Date = #2/28/2008#Dim d1 As Date = d.AddMonths(10) \'加上10个月
Dim d2 As Date = d.AddMonths(-10) \'减去10个月
Output.Show("10个月后的日期：" & d1)
Output.Show("10个月前的日期：" & d2)
-- 发布时间：2011/9/13 0:46:00
--
没有解决
-- 发布时间：2011/9/13 7:51:00
--
怎么会?
-- 发布时间：2011/9/13 8:19:00
--
以下是引用ycyms在2011-9-13 0:46:00的发言：
没有解决
没有解决
不可能的，解决不了，就上传文件