读取武林外传人物账号的代码[受高人指点,问题已解决不要顶了]

nqh70

代码如下

Private Sub Command10_Click()
Dim base As Long
Dim base2 As Long'临时
Dim id(65) As Byte'存放账号
ReadProcessMemory hProcess, ByVal &H8D24F8, base, 4, 0&
ReadProcessMemory hProcess, ByVal base + &H124, base2, 4, 0&
ReadProcessMemory hProcess, ByVal base2, id(0), 64, 0&
Label1.Caption = CStr(id)'难道 是这里转换出了问题？
End Sub

据他说可以正常读取人物账号，但我每次读取都是乱码，请大家帮忙看下，哪里出了错，谢谢了

esls999

Label1.Caption = StrConv(ID, vbUnicode)