急救,在线等待。如何将含有汉字的字节数组转换成字符串?

sunheart 2004-04-10 04:05:31
急救,在线等待。如何将含有汉字的字节数组转换成字符串?
各位大虾帮忙啊
...全文
209 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
sunheart 2004-04-14
  • 打赏
  • 举报
回复
谢谢各位大虾^_^
chinams 2004-04-12
  • 打赏
  • 举报
回复
dim i$,j$,k() as byte
i="带汉字的字符串"
k=i 'k数组是已经含有汉字的数组
j=k '此处把数组再转换为字符串

若k数组中不是UNicode码,还可以用函数进行转换.
mmcgzs 2004-04-12
  • 打赏
  • 举报
回复
StrConv(mybyte,vbUnicode)
tztz520 2004-04-12
  • 打赏
  • 举报
回复
up
northwolves 2004-04-10
  • 打赏
  • 举报
回复
StrConv(mybyte,vbUnicode)
supergreenbean 2004-04-10
  • 打赏
  • 举报
回复
StrConv(b,vbUnicode)不行么?
啊维 2004-04-10
  • 打赏
  • 举报
回复
Up
华芸智森 2004-04-10
  • 打赏
  • 举报
回复
'二进制数组转字符型
'函数:ByteArrToStr
'参数:inByte 传入的BYTE数组,strlen 数组长度.
'返回值:字符串.
'例子:
Public Function ByteArrToStr(inByte() As Byte, Optional ByVal strlen As Long = 0) As String
Dim I As Long
Dim RevStr As String
If strlen = 0 Then strlen = UBound(inByte)

For I = 0 To strlen
If inByte(I) = 0 Then
Exit For
End If
RevStr = RevStr & Chr(inByte(I))
Next
ByteArrToStr = RevStr
End Function

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧