[VB.NET]DateDiff 関数で2つの指定した日付の時間間隔を指定する

関数
DateDiff(interval, date1, date2, [ firstdayofweek, [ firstweekofyear ]] )
interval 必須。
date1、date2 計算に使用する 2 つの日付です。
interval 引数の設定は次のとおりです。

yyyy 年
q 四半期
m 月
y 通年での日数
d 日
w 平日

使用例

Dim tDate As Date    ' 変数宣言
Dim Msg
tDate = InputBox("日付を入力してください")
Msg = "指定日から本日までの日数: " & DateDiff("d", Now, tDate)
MsgBox(Msg)

結果
「2022/12/30」を入力して「OK」をクリックします。
「指定日から本日までの日数:136」が表示されます。

VB.net

Posted by arkgame