以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何自动生成有效期  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=12662)

--  作者:ycyms
--  发布时间:2011/9/10 21:52:00
--  [求助]如何自动生成有效期
就是说在表格的一列选择一个日期后,在另一列自动生成一个3个月保质期的有效日期.如何做?图片点击可在新窗口打开查看
--  作者:kevin
--  发布时间:2011/9/10 22:24:00
--  

直接加上90,可以吗

 


--  作者:e-png
--  发布时间: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)


--  作者:ycyms
--  发布时间:2011/9/13 0:46:00
--  
没有解决
--  作者:blackzhu
--  发布时间:2011/9/13 7:51:00
--  
怎么会?
--  作者:狐狸爸爸
--  发布时间:2011/9/13 8:19:00
--  
以下是引用ycyms在2011-9-13 0:46:00的发言:
没有解决

 

不可能的,解决不了,就上传文件