[VB.NET]AddYears, AddMonths, AddDaysで年月日の加算、減算

2014年9月19日2021年9月30日

書式
1.Public Function AddDays (value As Double) As DateTime
このインスタンスで表された日付と時刻に value で表された日数を加算した値を保持するオブジェクト。

2.Public Function AddMonths (months As Integer) As DateTime
このインスタンスで表された日付と時刻と months の合計を値とするオブジェクト。

3.Public Function AddYears (value As Integer) As DateTime
このインスタンスで表された日付と時刻に value で表された年数を加算した値を保持するオブジェクト。

使用例

Module Module1

    Sub Main()

        'DateTime型変数
        Dim td As DateTime = DateTime.Today
        Console.WriteLine("現在: " + td.ToString)
        '1年後
        Dim addRes As DateTime = td.AddYears(1)
        '1年前
        Dim mnRes As DateTime = td.AddYears(-1)
        Console.WriteLine("************")
        Console.WriteLine("1年の加算： " + addRes.ToString)
        Console.WriteLine("1年の減算: " + mnRes.ToString)

        '三ヶ月後
        Dim monAdd As DateTime = td.AddMonths(3)
        '三か月前
        Dim monPlu As DateTime = td.AddMonths(-3)
        Console.WriteLine("************")
        Console.WriteLine("月の加算： " + monAdd.ToString)
        Console.WriteLine("月の減算: " + monPlu.ToString)


        '20日の加算
        Dim dayAdd As DateTime = td.AddDays(20)
        '20日の減算
        Dim dayPlu As DateTime = td.AddDays(-20)
        Console.WriteLine("************")
        Console.WriteLine("日の加算： " + dayAdd.ToString)
        Console.WriteLine("日の減算:  " + dayPlu.ToString)


        Console.ReadKey()

    End Sub

End Module

結果
現在: 2021/09/30 0:00:00
************
1年の加算： 2022/09/30 0:00:00
1年の減算: 2020/09/30 0:00:00
************
月の加算： 2021/12/30 0:00:00
月の減算: 2021/06/30 0:00:00
************
日の加算： 2021/10/20 0:00:00
日の減算: 2021/09/10 0:00:00