Imports System
Imports System.Globalization
Imports System.Security.Permissions
Imports System.Threading
Public Class SamplesCultureInfo
Public Shared Sub Main()
Console.WriteLine("CurrentCulture is {0}.", CultureInfo.CurrentCulture.Name)
Thread.CurrentThread.CurrentCulture = New CultureInfo("th-TH", False)
Console.WriteLine("CurrentCulture is now {0}.", CultureInfo.CurrentCulture.Name)
End Sub
End Class