VB日期的问题
发布网友
发布时间:2023-06-10 14:58
我来回答
共2个回答
热心网友
时间:2024-11-15 19:31
2013-01-27
date-1
2013-01-29
date+1
热心网友
时间:2024-11-15 19:32
DateAdd 函数示例本示例先取得一个日期,再用 DateAdd 函数显示未来数月后的日期。 Dim FirstDate As Date ' 声明变量。
Dim IntervalType As StringDim Number As IntegerDim MsgIntervalType = "m" ' "m"指定以“月份”作为间隔。
FirstDate = InputBox("Enter a date")Number = InputBox("Enter number of months to add")Msg = "New date: " & DateAdd(IntervalType, Number, FirstDate)MsgBox Msg