[VB.NET]日付、時間の加減方法について

>Blog Top Page >[VB.NET] Top Page >[VB.NET] VB.NET ALL

■日付、時間の加減方法について

view plainprint?

1. Module Module1  
2.   
3.     Sub Main()  
4.   
5.         Dim DateTimeObj As DateTime = DateTime.ParseExact("2013/01/31", "yyyy/MM/dd", Nothing)  
6.   
7.         Console.WriteLine("ベースの日時{0}", DateTimeObj.ToString)  
8.   
9.         Console.WriteLine("□日付の加減算")  
10.         Console.WriteLine("１年後 - {0}", DateTimeObj.AddYears(1).ToString)  
11.         Console.WriteLine("１年前 - {0}", DateTimeObj.AddYears(-1).ToString)  
12.   
13.         Console.WriteLine("来月 - {0}", DateTimeObj.AddMonths(1).ToString)  
14.         Console.WriteLine("先月 - {0}", DateTimeObj.AddMonths(-1).ToString)  
15.   
16.         Console.WriteLine("明日 - {0}", DateTimeObj.AddDays(1).ToString)  
17.         Console.WriteLine("昨日 - {0}", DateTimeObj.AddDays(-1).ToString)  
18.   
19.         Console.WriteLine("□時間の加減算")  
20.         Console.WriteLine("１時間後 - {0}", DateTimeObj.AddHours(1).ToString)  
21.         Console.WriteLine("１時間前 - {0}", DateTimeObj.AddHours(-1).ToString)  
22.   
23.         Console.WriteLine("１分後 - {0}", DateTimeObj.AddMinutes(1).ToString)  
24.         Console.WriteLine("１分前 - {0}", DateTimeObj.AddMinutes(-1).ToString)  
25.   
26.     End Sub  
27.   
28. End Module  

Module Module1

    Sub Main()

        Dim DateTimeObj As DateTime = DateTime.ParseExact("2013/01/31", "yyyy/MM/dd", Nothing)

        Console.WriteLine("ベースの日時{0}", DateTimeObj.ToString)

        Console.WriteLine("□日付の加減算")
        Console.WriteLine("１年後 - {0}", DateTimeObj.AddYears(1).ToString)
        Console.WriteLine("１年前 - {0}", DateTimeObj.AddYears(-1).ToString)

        Console.WriteLine("来月 - {0}", DateTimeObj.AddMonths(1).ToString)
        Console.WriteLine("先月 - {0}", DateTimeObj.AddMonths(-1).ToString)

        Console.WriteLine("明日 - {0}", DateTimeObj.AddDays(1).ToString)
        Console.WriteLine("昨日 - {0}", DateTimeObj.AddDays(-1).ToString)

        Console.WriteLine("□時間の加減算")
        Console.WriteLine("１時間後 - {0}", DateTimeObj.AddHours(1).ToString)
        Console.WriteLine("１時間前 - {0}", DateTimeObj.AddHours(-1).ToString)

        Console.WriteLine("１分後 - {0}", DateTimeObj.AddMinutes(1).ToString)
        Console.WriteLine("１分前 - {0}", DateTimeObj.AddMinutes(-1).ToString)

    End Sub

End Module

>Blog Top Page >[VB.NET] Top Page >[VB.NET] VB.NET ALL