[語言]vb.net簡繁轉換

出處 http://blog.blueshop.com.tw/hammerchou/articles/27760.aspx

複製內容保留:

VB.Net StrConv 函式介紹

Public Shared Function StrConv(ByVal Str As String, _ByVal Conversion As Microsoft.VisualBasic.VbStrConv, _Optional ByVal LocaleID As Integer) As String

參數
Str : 必要項。所要轉換的 String 運算式。
Conversion : 必要項。Microsoft.VisualBasic.VbStrConv 成員。指定所要執行的轉換型別的列舉值。
LocaleID : 選擇項。如果不同於系統 LocaleID 值，則使用此 LocaleID 值 (系統 LocaleID 值是預設值)。

Conversion 引數設定包括：

列舉成員 說明
VbStrConv.None 不執行轉換
VbStrConv.LinguisticCasing 使用大小寫的語言規格，而不是檔案系統 (預設值)。
只有配合大寫及小寫時才有效。

VbStrConv.UpperCase VbStrConv.UpperCase
VbStrConv.LowerCase VbStrConv.LowerCase
VbStrConv.ProperCase VbStrConv.ProperCase
VbStrConv.Wide* VbStrConv.Wide*
VbStrConv.Narrow* VbStrConv.Narrow*
VbStrConv.Katakana** VbStrConv.Katakana**
VbStrConv.Hiragana** VbStrConv.Hiragana**
VbStrConv.SimplifiedChinese* VbStrConv.SimplifiedChinese*
VbStrConv.TraditionalChinese* VbStrConv.TraditionalChinese*




實際運用:
透過 StrConv 函式來進行繁體字及簡體字的相互轉換

Dim strData As String

' 將繁體中文字轉換成簡體中文
strData = StrConv("強力鎯頭的VB部落", VbStrConv.SimplifiedChinese, 2052)
' 簡體中文 (GB2312) 系統的 LocaleID (LCID) 為 2052
MessageBox.Show (strData) ' 顯示簡體中文字

' 將簡體中文字轉換成繁體中文
strData = StrConv("强力鎯头的VB部落", VbStrConv.TraditionalChinese, 1028)
' 繁體中文 (Big5) 系統的 LocaleID (LCID) 為 1028
MessageBox.Show (strData) ' 顯示繁體中文字