Yardım d3d ile ilgili

Beyler
D3D HACK YAPCAM AMA
POİNTERLERİ NEREYE YAZACAGİMİ BİLMİYORUM BUNUN ICINDE Bilen Bir Arkadaş Varsa Soylerse +++REP
TW DEN VEYA ALPEMİX TEN DE Gosterebilir...
''''LAMERİM''''''
Nasil Yazcagımıda Soylersenız Teşşekurler ---

 If GetAsyncKeyState(Keys.Right) = -32767 Then
            If Label1.ForeColor = Color.Orange Then
                Label3.ForeColor = Color.White
                Label3.Text = "[ON]"
                Exit Sub
            End If
            If Label2.ForeColor = Color.Orange Then
                Label4.ForeColor = Color.White
                Label4.Text = "[ON]"
                Exit Sub
            End If
            If Label6.ForeColor = Color.Orange Then
                Label5.ForeColor = Color.White
                Label5.Text = "[ON]"               
                Exit Sub
            End If
        End If

        If GetAsyncKeyState(Keys.Left) = -32767 Then
            If Label1.ForeColor = Color.Orange Then
                Label3.ForeColor = Color.Red
                Label3.Text = "[OFF]"
                Exit Sub
            End If
            If Label2.ForeColor = Color.Orange Then
                Label4.ForeColor = Color.Red
                Label4.Text = "[OFF]"
                Exit Sub
            End If
            If Label6.ForeColor = Color.Orange Then
                Label5.ForeColor = Color.Red
                Label5.Text = "[OFF]"
                Exit Sub
            End If
        End If
    End Sub