Question

如何用VB将Unicode转换为汉字

Answer 1

你是说，将包含 Unicode 代码的数字转换为汉字？

为什么一定是汉字呢？英文字符不行吗？

Private Function Unic2Str(ByVal Unic As Long) As String
    Dim UnicArr(1) As Byte
    If Unic >= 0 And Unic <= 65535 Then
        UnicArr(0) = Unic And 255
        UnicArr(1) = Unic \ 256
        Unic2Str = UnicArr
    Else
        Err.Raise 5 '无效的调用过程或参数(Invalid procedure call or argument)
    End If
End Function

Answer 2

不明觉厉。有这个必要吗？unicode本身就可以包含汉字啊