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

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 = #04/01/2008 6:53:00PM#
Console.WriteLine(date1.ToString("%h"))      ' Displays 6
Console.WriteLine(date1.ToString("h tt"))    ' Displays 6 PM