Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (dest As _ Any, source As Any, ByVal bytes As Long)' read a byte from memoryFunction PeekB(ByVal address As Long) As Byte CopyMemory PeekB, ByVal address, 1End Function' read an integer from memoryFunction PeekI(ByVal address As Long) As Integer CopyMemory PeekI, ByVal address, 2End Function' read a Long value from memoryFunction PeekL(ByVal address As Long) As Long CopyMemory PeekL, ByVal address, 4End Function