该代码改如何处理

全局代码中

Imports System
Imports System.Globalization
Imports System.Security.Permissions
Imports System.Threading

<assembly: SecurityPermission(SecurityAction.RequestMinimum, ControlThread := True)>
Public Class SamplesCultureInfo

   Public Shared Sub Main()

      \' Displays the name of the CurrentCulture of the current thread.
      Console.WriteLine("CurrentCulture is {0}.", CultureInfo.CurrentCulture.Name)

      \' Changes the CurrentCulture of the current thread to th-TH.
      Thread.CurrentThread.CurrentCulture = New CultureInfo("th-TH", False)
      Console.WriteLine("CurrentCulture is now {0}.", CultureInfo.CurrentCulture.Name)

      \' Displays the name of the CurrentUICulture of the current thread.
      Console.WriteLine("CurrentUICulture is {0}.", CultureInfo.CurrentUICulture.Name)

      \' Changes the CurrentUICulture of the current thread to ja-JP.
      Thread.CurrentThread.CurrentUICulture = New CultureInfo("ja-JP", False)
      Console.WriteLine("CurrentUICulture is now {0}.", CultureInfo.CurrentUICulture.Name)

   End Sub \'Main

End Class \'SamplesCultureInfo

\'This code produces the following output, if the ControlThread permission is granted (for example, if this code is run from the local drive).
\'
\'CurrentCulture is en-US.
\'CurrentCulture is now th-TH.
\'CurrentUICulture is en-US.
\'CurrentUICulture is now ja-JP.

直接去掉就行