SendKeys不工作？

Question

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    CheckBox1.Checked = True 
    While CheckBox1.Checked = True 
     SendKeys("{END}") 
    End While 
End Sub 

這是代碼，錯誤是「SendKeys是一種類型，不能用作表達式」。 我該如何解決這個問題？ 謝謝！

Answer 1

使用

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    CheckBox1.Checked = True 
    While CheckBox1.Checked = True 
     SendKeys.Send("{END}") 
    End While 
End Sub 

您需要參考SendKeys.Send（）;

Answer 2

使用SendKeys.Send("{END}",True)