子菜单？

Question

怎样在菜单不可见的情况下，子菜单也可用快捷键来实现某个功能啊！

Answer 1

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF2 Then
  MsgBox "Using the Sub Menu"   '写你的快捷键来实现某个功能
End If
End Sub

Answer 2

楼上啊，我也知道用这个方法的啊
可是，那个MSflexGrid控件的keypress事件不接受"DEL"这个键啊！

Answer 3

不用全局钩子
把Msflexgrid控件所在的窗体的keypreview属性设置为true然后在窗体的keydown或keyup里截获del键并处理
private sub form1_keyup(keyascii as integer,shift as ...)
   if keyascii=vbkeydelete
       if form1.controls.activecontrol. ... .. ..'你自己写吧
   end if
end sub