5. 1. 9. Add Time to current time
Public Class Tester
Public Shared Sub Main
Dim rightNow As Date = Now
Console.WriteLine ( "RightNow: " & rightNow.ToString )
' - ---- Add time values.
Console.WriteLine ( "RightNow.AddHours(5): " & rightNow.AddHours ( 5 ))
Console.WriteLine ( "RightNow.AddMinutes(6): " & rightNow.AddMinutes ( 6 ))
Console.WriteLine ( "RightNow.AddSeconds(7): " & rightNow.AddSeconds ( 7 ))
Console.WriteLine ( "RightNow.AddMilliseconds(8000): " & rightNow.AddMilliseconds ( 8000 ))
End Sub
End Class
RightNow: 11/05/2007 9:09:20 PM
RightNow.AddHours(5): 12/05/2007 2:09:20 AM
RightNow.AddMinutes(6): 11/05/2007 9:15:20 PM
RightNow.AddSeconds(7): 11/05/2007 9:09:27 PM
RightNow.AddMilliseconds(8000): 11/05/2007 9:09:28 PM
5. 1. Date 5. 1. 1. Dim thirdOfJuly As Date = #7/3/1776 11:59:59 PM# 5. 1. 2. Dim fourthOfJuly As New Date(1776, 7, 4) 5. 1. 3. Dim inTheMorning As New Date(1776, 7, 4, 9, 45, 30) 5. 1. 4. dateVariable = #1/1/2004# 5. 1. 5. dateVariable = #8/27/2001 6:29:11 PM# 5. 1. 6. dateVariable = 'July 2, 2002' 5. 1. 7. Add 3 years to a date 5. 1. 8. Date AddYears, AddMonths and AddDays 5. 1. 9. Add Time to current time 5. 1. 10. Elapsed Ticks 5. 1. 11. Subtract Time 5. 1. 12. Date ToString, ToLongDateString, ToShortDateString, ToLongTimeString, ToShortTimeString and ToUniversalTime 5. 1. 13. System Time 5. 1. 14. Moon Phase 5. 1. 15. Parse Date: Test an invalid date 5. 1. 16. Date and TimeSpan 5. 1. 17. ToLongDateString 5. 1. 18. ToLongTimeString 5. 1. 19. Date.ToOADate 5. 1. 20. Get Ticks from DateTime 5. 1. 21. Compare Date value in If statement 5. 1. 22. Select Day Of Week