本文整理汇总了VB.NET中System.DateTime.Year属性的典型用法代码示例。如果您正苦于以下问题：VB.NET DateTime.Year属性的具体用法？VB.NET DateTime.Year怎么用？VB.NET DateTime.Year使用的例子？那么恭喜您, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.DateTime的用法示例。
在下文中一共展示了DateTime.Year属性的3个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1:
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示例2: YearMethodExample
' 导入命名空间
Imports System.Globalization
Imports System.Threading
Module YearMethodExample
Public Sub Main()
' Initialize date variable and display year
Dim date1 As Date = #01/01/2008 6:32AM#
Console.WriteLine(date1.Year) ' Displays 2008
' Set culture to th-TH
Thread.CurrentThread.CurrentCulture = New CultureInfo("th-TH")
Console.WriteLine(date1.Year) ' Displays 2008
' display year using current culture's calendar
Dim thaiCalendar As Calendar = CultureInfo.CurrentCulture.Calendar
Console.WriteLine(thaiCalendar.GetYear(date1)) ' Displays 2551
' display year using Persian calendar
Dim persianCalendar As New PersianCalendar()
Console.WriteLine(persianCalendar.GetYear(date1)) ' Displays 1386
End Sub
End Module示例3: MainClass
' 导入命名空间
Imports System
Public Class MainClass
Shared Sub Main(ByVal args As String())
Dim currentTime as System.DateTime = System.DateTime.Now
Console.WriteLine("currentTime Year :" & currentTime.Year)
Console.WriteLine("currentTime Month:" & currentTime.Month)
Console.WriteLine("currentTime Date:" & currentTime.Date)
Console.WriteLine("currentTime Hour:" & currentTime.Hour)
Console.WriteLine("currentTime Minute:" & currentTime.Minute)
Console.WriteLine("currentTime Second:" & currentTime.Second)
End Sub
End Class