VB里面算两个日期之间相隔的天数用哪个函数

Posted 2023-05-12

可以用DateDiff函数，但更简单的方法是把两个日期直接相减（大的日期减去小的日期）即可，比如：
MsgBox Now - CDate("2012-1-1") 参考技术A DateDiff 函数返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目本回答被提问者采纳 参考技术B datediff("d","2010-1-1",date)

golang 获取AB两个日期相差多少天

参考技术A 1.可以用DateDiff函数，返回值表示两个指定日期间的时间间隔。
2.也可以把两个日期直接相减：
a = Now - CDate("2014-1-1") '2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1") '2014年1月1日到2014年3月1日，共这么多天。
vb的函数是强大的，闰年和平年它自己会处理，无需担心。

追问：

那需要什么控件，能详细说一下吗

回答：

不需要任何控件呢，是系统自带的函数呢，你写到代码里面试试就可以了。
你稍等，我给你写代码：
'窗体弄一个按钮Command1，加入以下代码，你试试看：
Private Sub Command1_Click()
Dim a As Long
Dim b As Long
a = Now - CDate("2014-1-1")'2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1")'2014年1月1日到2014年3月1日，共这么多天。
Print "2014年1月1日到今天，共" & a & "天。"
Print "2014年1月1日到2014年3月1日,共" & b & "天。"
End Sub