수다닷컴

오류에 대하여 질문하신다면, 어느 부분에서 어떤 내용의 오류가 나는지를 써주세요.

Public Function ReadMemory2(ByVal hWnd As Long, ByVal Address As Long, ByRef Buffer As Long, ByVal nSize As Long) As LongOn Error GoTo Err
Dim hProcess As Long, hWindow As Long, Pid As Long, BufMem() As Byte, OldProtect As Long, Buf As Long, Addr As LonghWindow = hWndGetWindowThreadProcessId hWindow, Pid
If Pid = 0 Then EndhProcess = OpenProcess(PROCESS_VM_READ, False, Pid)
If hProcess = 0 Then EndVirtualProtectEx hProcess, ByVal Address, nSize, PAGE_EXECUTE_READWRITE, OldProtect
ReadProcessMemory hProcess, ByVal Address, Buf, nSize, ByVal 0&
VirtualProtectEx hProcess, ByVal Address, nSize, OldProtect, ByVal 0&Buffer = Buf
Exit Function
Err:
ReadMemory = -1End Function컴파일 오류입니다.:
대입의 왼쪽에서 호출하는 함수는 Variant나 Object를 반환해야합니다프로세스 분석기 만드는데 오류뜨네요? 잘못된거 없다고 보는데.실력자분들 도와주십시오.

신청하기