为什么我不能用VB模拟这个F1?

来源：百度知道 编辑：UC知道 时间：2024/05/29 15:57:20
代码如下:Private Sub Command1_Click()
SendKeys "{F1}"
End Sub

为什么他不按F1啊

实际上是按了F1的，只不过他的效果你看不出来。因为你在调试的时候，本窗体获得焦点，你又把代码放在Command1_Click 里面，也就意味着这一段按键代码触发的时候，必然Command1获得焦点，这时，F1键即使被按下也不起任何作用。不信你可以此时手动按下F1，也是没有反应的。
验证这个说法，请你在你的代码下面添加以下代码，以验证的确按下了F1，只不过他的效果你看不出来。
＝＝＝＝＝＝＝＝＝＝＝

Private Sub Command1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then MsgBox ""
End Sub