Question

VB 读内存中汉字，的问题

dim base as long
dim renwu_name as long
hProcess = OpenProcess(PROCESS_ALL_ACCESS, False, Pid)
If hProcess Then
ReadProcessMemory hProcess, ByVal &H6B9EF0, base, 4, 0&
ReadProcessMemory hProcess, ByVal base + &H37F8, renwu_name, 4, 0&
CloseHandle hProcess
End If
Label1.Caption =
我是想把，renwu_name 要变成汉字啊 ，现在renwu_name要经过怎么处理啊，，和，该内存中汉字编码有关吗如果有，那么，请讲两个编码读取吧 （ASII 码）和U码，，，

Answer 1

dim base as long
dim renwu_name（35） as byte
dim name as string
hProcess=OpenProcess(PROCESS_ALL_ACCESS, False, Pid)
If hProcess Then ReadProcessMemory hProcess, ByVal &H6B9EF0, base, 4, 0& ReadProcessMemory hProcess, ByVal base + &H37F8, renwu_name, 4, 0&
Readprocessmemory hprocess,byval renwu_name,name(0),36,0&

CloseHandle hProcess
End If
Label1.Caption =trim(left$(name,36))

好久没用vb了 写挂也快遗忘了看看上边的可以吗？ 希望对你有帮助。 再说一点问 问题加点分你的问题会得到更多的关注

Answer 2

strconv(renwu_name,vbUnicode)转码下就OK，如果不行strconv(renwu_name,vbFromUnicode),使用什么取决于你的Renwu_Name采用什么编码