怎样将两个ascii码合并成一个汉字？？？

[Jerrych]

我已经试过strconv合并，但并不是所有的字都可以，下边是例子和过程代码
Public Function FixAsc(ByVal HiAsc As Long, ByVal LoAsc As Long) As St
ring
FixAsc = StrConv(Chr(HiAsc), vbFromUnicode) + StrConv(Chr(LoAsc), vb
FromUnicode)
End Function
下岗女工莫流泪-> 下 尀 女 崀 流 氀(中间每个汉字之间用空格隔开了)
下边是这几个字的高低位码
and 11 78 and 151 92 and 115 89 and 229 93 and 171 131 and 65 109 and 234 108
下边是这几个字的编码
and -12350 and -18214 and -14930 and -18012 and -15190 and -15881 and -16159
请各位大虾帮我解决解决,先谢谢了

[iwin]

试试这个：
Public Function FixAsc(ByVal HiAsc As Long, ByVal LoAsc As Long) As String
FixAsc = ChrB(HiAsc) + ChrB(LoAsc)
End Function

[Un1]

Private Sub Command1_Click()

Dim bt() As Byte
ReDim bt(3)

bt(0) = 11
bt(1) = 78

bt(2) = 151
bt(3) = 92

MsgBox bt
End Sub

[amstar]

有的字好像不行