[VB.net]DateTimeで月の差分を求める
書式
年 DateTimeオブジェクト名.Year
月 DateTimeオブジェクト名.Month
使用例
module Module1 Sub Main() ' 指定日時1 Dim dtA As New DateTime(2020, 8, 1, 0, 0, 0) ' 指定日時2 Dim dtB As New DateTime(2021, 2, 2, 0, 0, 0) Dim res As Integer '年の差分 月の差分 res = (12 * (dtB.Year - dtA.Year)) + (dtB.Month - dtA.Month) '年の取得 Console.WriteLine(dtB.Year) Console.WriteLine(dtA.Year) Console.WriteLine("月の差分結果") Console.WriteLine(res) Console.ReadKey() End Sub End Module
結果
2021
2020
月の差分結果
6