按钮问题!

Question

我看别人程序的按钮文字旁边有(I)还带有下划线的,在此按钮获得焦点时按下I就触发了此按钮的事件.我在我自己程序的确按钮中设置了按钮.Caption=(&I),但是没有先前的效果!请高手赐教!

Answer 1

是按Alt + 快捷键，比如.Caption=(&I)，就按Alt + I。

Answer 2

按钮.caption="按钮 &I"
按Alt + I 即激活按钮click 事件

Answer 3

Private Sub Command1_Click()
MsgBox ""
End Sub
当按ALT+I时候就弹出信息框

Answer 4

Option ExplicitPrivate Sub Command1_Click()
    MsgBox "你点了确定!"
End SubPrivate Sub Form_Load()
    Command1.Caption = "确定(&I)"
End Sub

Answer 5

ALT+I是访问键,不是快捷键
如果是在菜单中直接就可以在菜单编辑器中设置快捷键

Answer 6

我想应该与(I)无关,就该是用keypress事件来捕捉键盘事件的.当在form_keypress()事件中获得键盘按下的是CTRL+I时候,触发某个事件.

Answer 7

先把form.keypreview=true然后:Private Sub Command1_Click()
   MsgBox "561456"
End SubPrivate Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If Shift = 2 And KeyCode = 73 Then
      Command1_Click
   End If
End Sub注:2是Ctrl的Ascii码值,73是I的Ascii码值