知识大全解决VB.net中ReadProcessMemory的问题

Posted 2022-07-17 知

篇首语：一个人必须学习与自己不同类型的人相处，不然生活何其孤苦。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全解决VB.net中ReadProcessMemory的问题相关的知识，希望对你有一定的参考价值。

解决VB.net中ReadProcessMemory的问题 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　最近学校上VB NET的课 VB以前学过一点点只会看不会写不过没有办法学校开的所以几个人就组了个小组写一个下的杀毒软件要用到ReadProcessMemory来读取其它进程的内存可以怎么调用也不行 goole和baidu找了N个小时提这个问题的人倒是一大堆可以是没有人解决过但是其中也给我一些其实后来在好友freecat的帮助下找到了问题的所在主要就是ReadProcessMemory声明的问题我们应该这样声明　　　　Public Declare Function ReadProcessMemory Lib kernel (ByVal hProcess As Integer ByVal lpBaseAddress As Integer ByVal lpBuffer() As Byte ByVal nSize As Integer ByRef lpNumberOfBytesWritten As Integer) As Integer　　　　主要是其中的 ByVal lpBaseAddress As Integer ByVal lpBuffer() As Byte　　　　要设为byval而不是byref　　　　这样调用就可以得到返回值了　　　　[code]　　Private Declare Function OpenProcess Lib kernel dll _　　(ByVal dwDesiredAccess As Integer ByVal bInheritHandle As Integer ByVal dwProcessId As Integer) As Integer　　Public Declare Function ReadProcessMemory Lib kernel (ByVal hProcess As Integer ByVal lpBaseAddress As Integer ByVal lpBuffer() As Byte ByVal nSize As Integer ByRef lpNumberOfBytesWritten As Integer) As Integer　　Private Const PROCESS_VM_READ As Long = &H 　　Dim ph As Integer　　Dim i As Integer　　Dim h As Integer　　Dim buffer( ) As Byte　　Dim bytesRead As Integer　　　　获得进程　　　　ph = OpenProcess(PROCESS_ALL_ACCESS False )　　If ph Then　　MessageBox Show( true )　　h = ReadProcessMemory(ph &H buffer buffer Length bytesRead)　　For i = To buffer Length 　　TempMem += buffer(i) ToString　　Next　　Else　　MessageBox Show( false )　　End If　　[/code] cha138/Article/program/net/201311/12639

知识大全 解决VB.net中ReadProcessMemory的问题

知识大全解决VB.net中ReadProcessMemory的问题