如何传一个F1键到一个Textbox中？

Question

内容up。

Answer 1

如何传一个F1键到一个Textbox中？  据说是vb四级的考题，有那位理解知道答案？

Answer 2

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

Answer 3

SendKeys 语句
      将一个或多个按键消息发送到活动窗口，就如同在键盘上进行输入一样。

Answer 4

Private Sub Command1_Click()
  Text1.SetFocus
  SendKeys "{F1}"
End SubPrivate Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
  If KeyCode = vbKeyF1 Then MsgBox "F1"
End Sub