richtextbox 的 text问题.

Question

代码:
 Dim a(0) As Byte
 a(0) = &HA0
 Text1.Text = StrConv(a, vbUnicode)
 RichTextBox1.Text = StrConv(a, vbUnicode)
为什么上面的代码,RichTextBox1.Text= StrConv(a, vbUnicode) 这句就出现内存溢出的错误呢?

Answer 1

大概是 RichTextBox 不能接受不可见字符。
因为你实际上返回了一个 chr(160) 给 RichTextBox，chr(160) 它一样会内存溢出。改成：
Dim a(1) As Byte
 a(0) = &HA0
 a(1) = &HB0
 Text1.Text = StrConv(a, vbUnicode)
 RichTextBox1.Text = StrConv(a, vbUnicode)就不会出错了。
这是 RichTextBox 自身的问题。

Answer 2

可是,我需要在 byte数组 和 字符串 之间相互转换的, 不能改变其中的内容.
那该怎么办呢?