實(shí)際運用:
透過(guò) StrConv 函式來(lái)進(jìn)行繁體字及簡(jiǎn)體字的相互轉換
Dim strData As String
' 將繁體中文字轉換成簡(jiǎn)體中文
strData = StrConv("強力鎯頭的VB部落", VbStrConv.SimplifiedChinese, 2052)
' 簡(jiǎn)體中文 (GB2312) 系統的 LocaleID (LCID) 為 2052
MessageBox.Show (strData) ' 顯示簡(jiǎn)體中文字
' 將簡(jiǎn)體中文字轉換成繁體中文
strData = StrConv(strData, VbStrConv.TraditionalChinese, 1028)
' 繁體中文 (Big5) 系統的 LocaleID (LCID) 為 1028
MessageBox.Show (strData) ' 顯示繁體中文字
聯(lián)系客服