BYTE数组和String转换

Dim b1(8) ,b2() as byte
dim s1 as stringb1(0)=&HE1
b1(1)=&H42
b1(2)=&H1d
b1(3)=&H4a
b1(4)=&H54
b1(5)=&H9a
b1(6)=&Hc5
b1(7)=&Hd5
b1(8)=&H0'正确的中文显示"酈JT毰 "类似,因为有不存在的特殊字符.
'转变值错误
s1=strconv(b1,vbunicode)
'转换值正确
b2=strconv(s1,vbFromUnicode)这样互转以下为什么b2和b1数组中的末尾值不同了???
我怎样才能在数组转字符串的的时候,确保s1的值正确.或者有什么办法能把数组的值直接写入数据库,而不用转成string再写库?