VB Flash控件快捷键问题

Question

百度了一下有的人说ShockwaveFlash1_FSCommand事件下是控制快捷键的，但是我使用keycode 没有效代码如下：Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
Select Case KeyCode
Case vbKeyF10
Me.Visible = False
End Select
End Sub 想实现的效果是一个全屏flash，按下F10退出当前窗体。请教前辈该如何实现？

Answer 1

http://hi.baidu.com/rousseauian/item/f5299d0e26d8fc143b53eeb2

Answer 2

我想实现的效果是快捷键，不是VB与FLASH结合