DateDiff()
函数返回两个日期之间的差值
表达式 DateDiff(timeinterval,date1,date2 [, firstdayofweek [, firstweekofyear]])
允许数据类型: timeinterval 表示相隔时间的类型, 代码为:
"y"表示"年"
"m"表示"月"
"d"表示"日"
"h"表示"时"
"n"表示"分"
"s"表示"秒"
新建From1(窗体),新建Command1(按钮CommandButton),代码:
Private Sub Command1_Click()
fromDate = #4/30/2025#
toDate = Now
'toDate = #5/23/2025#
Debug.Print "相差 " & DateDiff("d", fromDate, toDate)
End Sub
运行结果:
相差 23