为什么取不出进程句柄，解决办法

为什么取不出进程句柄，
Public   Class   Form1
        Public   Declare   Function   FindWindow   Lib   "user32 "   Alias   "FindWindowA "   (ByVal   hwnd   As   String,   ByVal   lpText   As   String)   As   Integer
        Public   Declare   Function   GetWindowThreadProcessId   Lib   "user32 "   Alias   "GetWindowThreadProcessId "   (ByVal   hwnd   As   Integer,   ByVal   lpText   As   Integer)   As   Integer
        Public   Declare   Function   OpenProcess   Lib   "kernel32 "   (ByVal   dwDesiredAccess   As   Integer,   ByVal   bInheritHandle   As   Integer,   ByVal   dwProcessId   As   Integer)   As   Integer
        Public   Const   PROCESS_ALL_ACCESS   =   &H1F0FFF
        Public   Declare   Function   ReadProcessMemory   Lib   "kernel32.dll "   (   _
                                                                                                                                    ByVal   hProcess   As   Integer,   _
                                                                                                                                    ByVal   lpBaseAddress   As   Integer,   _
                                                                                                                                    ByRef   lpBuffer   As   Object,   _
                                                                                                                                    ByVal   nSize   As   Integer,   _
                                                                                                                                    ByRef   lpNumberOfBytesWritten   As   Integer)   As   Integer