首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB6.0怎的把16BIT数据转为ASCII码

2013-01-11 
VB6.0怎样把16BIT数据转为ASCII码各位前辈请教一下VB6中怎样把16Bit数据转为ASCII码?如下图所示D12500个16

VB6.0怎样把16BIT数据转为ASCII码
各位前辈请教一下VB6中怎样把16Bit数据转为ASCII码?如下图所示
VB6.0怎的把16BIT数据转为ASCII码
D12500个16Bit数据,值为16717
VB6.0怎的把16BIT数据转为ASCII码
上图为转为ASCII码,值变为MA
请教给位大哥怎样用VB6.0写出来啊??
[解决办法]

引用:
引用:
Dim a(0 To 5) As Byte
a(0) = &H71
a(1) = &H4D
a(2) = &H32
a(3) = &H42
a(4) = &H39
a(5) = &H45
Debug.Print StrConv(a, vb……

就是一开始不知道这些值是多少,都是从D12500这个地址取得的值,此值时刻都是在变的 



Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Sub Command1_Click()
Dim Bin As Integer, tmp(0 To 1) As Byte, s As String
Bin = 16717
CopyMemory tmp(0), Bin, 2
s = StrConv(tmp, vbUnicode)
Debug.Print s
End Sub

热点排行