DIR Return Create A Forum - Home
       ---------------------------------------------------------
       Hack Community
  HTML https://roshacks.createaforum.com
       ---------------------------------------------------------
       *****************************************************
   DIR Return to: VB.NET
       *****************************************************
       #Post#: 628--------------------------------------------------
       [VB.NET] Array of Byte Scan
       By: pipo1337 Date: May 21, 2018, 9:17 pm
       ---------------------------------------------------------
       [code]Public Function AOBSCAN(ByVal GameName As String, ByVal
       ModuleName As String, ByVal Signature As Byte(), ByVal Mask As
       Byte()) As Integer
       Dim BaseAddress, EndAddress As Int32
       For Each PM As ProcessModule In
       Process.GetProcessesByName(GameName)(0).Modules
       If ModuleName = PM.ModuleName Then
       BaseAddress = PM.BaseAddress
       EndAddress = BaseAddress + PM.ModuleMemorySize
       End If
       Next
       Dim curAddr As Int32 = BaseAddress
       Do
       For i As Integer = 0 To Signature.Length - 1
       If ReadByte(curAddr + i) = Signature(i) Or
       Mask(i) = &H0 Then
       If i = Signature.Length - 1 Then
       MsgBox(curAddr.ToString("X"))
       Return curAddr
       End If
       Continue For
       End If
       Exit For
       Next
       curAddr += 1
       Loop While curAddr < EndAddress
       Return 0
       End Function[/code]
       *****************************************************