菜单：保存数据(S) CTRL+S 后面的CTRL+S如何才能起作用？请问

菜单：保存数据(S) CTRL+S 后面的CTRL+S怎么才能起作用？请教
保存数据(S)   ===那个S是要写上（&S）就可以了，那么那个CTRL+S怎么才能起作用？请教

------解决方案--------------------
菜单编辑器里面 设置了就起作用了 不知道你是不是指菜单 还是按钮?按钮的话是 &S 快捷键就是ALT+S 或者你自己在form1_load事件中定义置 窗体级快捷键 前提是 form1.keypreview 设置为true
------解决方案--------------------
给你个例子吧
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = Asc( "s ") And Shift = 2 Then mnuSave_Click

End Sub

Private Sub Form_Load()
Me.KeyPreview = True

End Sub

Private Sub mnuSave_Click()
MsgBox "ctrl+s "
End Sub