本文整理汇总了VB.NET中System.Globalization.KoreanCalendar.AddYears方法的典型用法代码示例。如果您正苦于以下问题：VB.NET KoreanCalendar.AddYears方法的具体用法？VB.NET KoreanCalendar.AddYears怎么用？VB.NET KoreanCalendar.AddYears使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。
在下文中一共展示了KoreanCalendar.AddYears方法的1个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: Main
' 导入命名空间
Imports System.Globalization
Public Class SamplesKoreanCalendar
Public Shared Sub Main()
' Sets a DateTime to April 3, 2002 of the Gregorian calendar.
Dim myDT As New DateTime(2002, 4, 3, New GregorianCalendar())
' Creates an instance of the KoreanCalendar.
Dim myCal As New KoreanCalendar()
' Displays the values of the DateTime.
Console.WriteLine("April 3, 2002 of the Gregorian calendar equals the following in the Korean calendar:")
DisplayValues(myCal, myDT)
' Adds two years and ten months.
myDT = myCal.AddYears(myDT, 2)
myDT = myCal.AddMonths(myDT, 10)
' Displays the values of the DateTime.
Console.WriteLine("After adding two years and ten months:")
DisplayValues(myCal, myDT)
End Sub
Public Shared Sub DisplayValues(myCal As Calendar, myDT As DateTime)
Console.WriteLine(" Era: {0}", myCal.GetEra(myDT))
Console.WriteLine(" Year: {0}", myCal.GetYear(myDT))
Console.WriteLine(" Month: {0}", myCal.GetMonth(myDT))
Console.WriteLine(" DayOfYear: {0}", myCal.GetDayOfYear(myDT))
Console.WriteLine(" DayOfMonth: {0}", myCal.GetDayOfMonth(myDT))
Console.WriteLine(" DayOfWeek: {0}", myCal.GetDayOfWeek(myDT))
Console.WriteLine()
End Sub
End Class输出：
April 3, 2002 of the Gregorian calendar equals the following in the Korean calendar: Era: 1 Year: 4335 Month: 4 DayOfYear: 93 DayOfMonth: 3 DayOfWeek: Wednesday After adding two years and ten months: Era: 1 Year: 4338 Month: 2 DayOfYear: 34 DayOfMonth: 3 DayOfWeek: Thursday