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
' 將繁體中文字轉換成簡體中文
''big5转gb2312
Dim str As String = TextBox1.Text
Dim gb2312 As String = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(950), Encoding.GetEncoding(936), Encoding.Default.GetBytes(str)))
TextBox2.Text = StrConv(gb2312, VbStrConv.SimplifiedChinese)
' 將簡體中文字轉換成繁體中文
''gb2312转big5
Dim str As String = TextBox1.Text
str = StrConv(str, VbStrConv.TraditionalChinese)
TextBox2.Text = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(936), Encoding.GetEncoding(950), Encoding.Default.GetBytes(str)))