VB.Net/Development/Calendar

Calendar Localization

<source lang="vbnet"> Imports System Imports System.Globalization Module Module1

   Sub Main()
      Dim MyCalendar As Calendar = New GregorianCalendar()
     "Dim MyCalendar As Calendar = New HebrewCalendar()
     Dim MyDate As New DateTime(2001, 8, 22, 15, 30, 0, 0)
     Dim MyCulture As CultureInfo = New CultureInfo("es-ES")
     Console.WriteLine(MyCalendar.AddMinutes(MyDate, 15).ToString("G", MyCulture))
     Console.WriteLine(MyCalendar.TwoDigitYearMax)
     Console.WriteLine(MyCalendar.ToFourDigitYear(32))
     Console.WriteLine(MyCalendar.ToFourDigitYear(28))
   End Sub

End Module

 </source>