vb.net实现繁简转换

Dim strSimplifiedChinese, strTraditionalChinese As String 
        strSimplifiedChinese 
= "我是中国人!" 
        strTraditionalChinese 
= StrConv(strSimplifiedChinese, VbStrConv.TraditionalChinese) '简转繁 
        Console.Write(strTraditionalChinese) 
        strSimplifiedChinese 
= StrConv(strTraditionalChinese, VbStrConv.SimplifiedChinese) '繁转简 
        Console.Write(strSimplifiedChinese)
posted @ 2007-07-19 18:00  Athrun  阅读(252)  评论(0编辑  收藏  举报