vb System.DateTime.AddDays类(方法)实例源码

Class Class1
   Public Shared Sub Main()
      Dim today As System.DateTime
      Dim answer As System.DateTime

      today = System.DateTime.Now
      answer = today.AddDays(36)

      Console.WriteLine("Today: {0:dddd}", today)
      Console.WriteLine("36 days from today: {0:dddd}", answer)
   End Sub
End Class