C#代码转VB的问题

Question

下面这段C#代码转VB,该怎么写？
Thread.CurrentThread.CurrentUICulture = new CultureInfo(UserCulture);
Thread.CurrentThread.CurrentCulture = CultureInfo.CreateSpecificCulture(UserCulture);
不知道这两句在VB中该怎么写
new CultureInfo(UserCulture);和CultureInfo.CreateSpecificCulture(UserCulture);

Answer 1

一样的
Thread.CurrentThread.CurrentUICulture = New CultureInfo(UserCulture)
Thread.CurrentThread.CurrentCulture = CultureInfo.CreateSpecificCulture(UserCulture)

Answer 2

需要这两个命名空间
Imports System.Threading
Imports System.Globalization

Answer 3

Thread.CurrentThread.CurrentUICulture = New CultureInfo(UserCulture) 
Thread.CurrentThread.CurrentCulture = CultureInfo.CreateSpecificCulture(UserCulture)
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 最新版本：20070212http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html

Answer 4

已经引入了两个命名空间，全部代码如下。
如果我在IE选项中将默认语言改为en-us，显示就没问题，但用程序控制就是不行
'//选择语言
If (Session("PreferredCulture") = Nothing) Then
    Session("PreferredCulture") = "en-us"
End If
Dim UserCulture As String = Session("PreferredCulture").ToString()
If (UserCulture <> "") Then                
   Thread.CurrentThread.CurrentUICulture = New CultureInfo(UserCulture)
   Thread.CurrentThread.CurrentCulture = CultureInfo.CreateSpecificCulture(UserCulture)
   Session("PreferredCulture") =""               
End If