■日付、時間の加減方法について
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("1年後 - {0}", DateTimeObj.AddYears(1).ToString) Console.WriteLine("1年前 - {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("1時間後 - {0}", DateTimeObj.AddHours(1).ToString) Console.WriteLine("1時間前 - {0}", DateTimeObj.AddHours(-1).ToString) Console.WriteLine("1分後 - {0}", DateTimeObj.AddMinutes(1).ToString) Console.WriteLine("1分前 - {0}", DateTimeObj.AddMinutes(-1).ToString) End Sub End Module
0 件のコメント:
コメントを投稿