如何将unicode字符转换成汉字？

如果是VB的话可以用chrw()实现unicode字符转换成汉字，用ascw()可以实现汉字转换成unicode码。
那如果是好几个字符（字符串）呢？该怎么转换？
回答：是的。不过可以像下面这样来操作：

Dim unicode()
st = "字符串"
L = Len(st)
ReDim unicode(L)
For i = 0 To L - 1
unicode(i) = AscW(Mid(st, i + 1, 1))
Next
For i = 0 To L - 1
Print unicode(i)
Next这样字符串的所有字符都转换成unicode码并全部放到了数组unicode中了