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)