如何在VB中計算兩個日期間的天數

可以參考下面的代碼：

Private Sub DTPicker1_Change()

Text1.Text = DateDiff("d", DTPicker1, DTPicker2)

End Sub

Private Sub DTPicker2_Change()

Text1.Text = DateDiff("d", DTPicker1, DTPicker2)

End Sub

擴展資料：

VB參考函數

Date 函數： 返回當前系統日期。?

DateAdd 函數： 返回加上了指定的時間間隔的日期。?

DateDiff 函數： 返回兩個日期之間的間隔。?

DatePart 函數： 返回給定日期的指定部分。?

DateSerial 函數： 返回指定年月日的日期子類型的變體 。?

DateValue 函數： 返回日期子類型的變體 。?

Day 函數： 返回日期，取值範圍為 1 至 31。?

百度百科-Visual Basic