VB 2010 sendkeysエラー

Question

VBをはじめて使用します。私は知りません、なぜこの簡単なコードは動作しません。

Imports System.Runtime.InteropServices 

Public Class Form1 

    Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
     Application.Exit() 
    End Sub 

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
     Dim ProcID As Integer 
     ProcID = 2940 
     AppActivate(ProcID) 
     SendKeys.SendWait("Username") 
     SendKeys.SendWait("{ENTER}") 
     SendKeys.SendWait("Password") 
     SendKeys.SendWait("{ENTER}") 
    End Sub 
End Class 

エラー：

Answer 1

それが原因でゲームガードのですが、私の窓を.... protectiongさ 「ちょうど」の行は、この例外が表示されない