Fehler im Code

[xXGodfatherXx]

Wie der Titel schon sagt, habe ich einen Fehler in meinem Source-Code. Ich weiß aber nicht, wo der liegt, also frage cih euch mal. habe schon paar stunden probiert, aber leider erfolglos.
Die Adresse habe ich durch 12345 ersetzt, sie ist 100 %ig richtig, da ich sie bei cheat engine mehrmals getestet habe.

Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick GetProcessId(Procname) Write_Long(&H12345, 1000) 'Lebensadresse End Sub Private Sub Timer5_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load GetProcessId(Procname) If GetAsyncKeyState(VK_F4) Then If Timer4.Enabled = False Then Timer4.Enabled = True ElseIf Timer4.Enabled = True Then Timer4.Enabled = False End If System.Threading.Thread.Sleep(500) End If End Sub

---

VK_F4 habe ich natürlich deklariert, ist fehlerfrei aber ingame klappt es nicht.
geht um CoD4 und die Lebensadresse.
1.Timer:Interval:1, rest standard
2.Timer:Interval:50,Enabled=True