Mega Code Archive
Creates and initializes a ThaiBuddhistCalendar
<![CDATA[
Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Public Class MainClass
Public Shared Sub Main()
Dim myCal As New ThaiBuddhistCalendar()
Dim y As Integer
For y = 2001 To 2010
Console.Write(ControlChars.Tab + "{0}", y)
Next y
End Sub
End Class
]]>