现在使用DAY(),Month(),Year()函数提取了所需年月日,现在需要在提取的年数值上增加一数值,请问需要如何实现?
我的代码为 :
DateDTP=ScreenItems("DateDTP").value
Dim Year1,Month1,Day1
Year1=Year(DateDTP)
Dim Year2
Year2=Year1+val(Validity.Text)
最佳答案
用DateAdd函数,比如:
DateAdd("yyyy",1,Now)
提问者对于答案的评价:
谢谢
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc363416.html