Dim strSimplifiedChinese, strTraditionalChinese As String strSimplifiedChinese = "I am Chinese!" StrTraditionalChinese = StrConv (strSimplifiedChinese, VbStrConv.TraditionalChinese) 'Jane turn fan Console.Write (strTraditionalChinese) strSimplifiedChinese = StrConv (strTraditionalChinese, VbStrConv.SimplifiedChinese)' Traditional turn Jane Console .Write (strsimplifiedchinese)
