Development VB.Net

Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Public Class SamplesGregorianCalendar   
   Public Shared Sub Main()
      Dim myCal As New GregorianCalendar()
      For y = 2001 To 2005
         Console.Write(ControlChars.Tab + "{0}", myCal.GetMonthsInYear(y, GregorianCalendar.CurrentEra))
      Next y
      Console.WriteLine()
   End Sub 
End Class