Dim moment As New System.DateTime(1999, 1, 13, 3, 57, 32, 11)

' Year gets 1999.
Dim year As Integer = moment.Year

' Month gets 1 (January).
Dim month As Integer = moment.Month

' Day gets 13.
Dim day As Integer = moment.Day

' Hour gets 3.
Dim hour As Integer = moment.Hour

' Minute gets 57.
Dim minute As Integer = moment.Minute

' Second gets 32.
Dim second As Integer = moment.Second

' Millisecond gets 11.
Dim millisecond As Integer = moment.Millisecond

Dim date1 As Date = New Date(2008, 1, 1, 0, 30, 45, 125)
Console.WriteLine("Milliseconds: {0:fff}", _
                  date1)       ' displays Milliseconds: 125

Dim date3 As New Date(2008, 1, 1, 0, 30, 45, 125)
Console.WriteLine("Date with milliseconds: {0:MM/dd/yyy HH:mm:ss.fff}", _
                  date3)