external triggerbot hilfe!

   Public Function GetModuleBase(ByVal Procname As String, ByVal ModuleName As String)
        Dim BaseAdress As Int32
        For Each PM As ProcessModule In Process.GetProcessesByName(Procname)(0).Modules
            If ModuleName.ToLower = PM.ModuleName.ToLower Then
                BaseAdress = ->>>da gehört  PM.BaseAdress <<<--- (aber ich bekommen einen fehler  wenn ich  pm. davor lasse)
 
            End If
        Next
        Return BaseAdress
    End Function