VB6错误的事件在F5上发生

时间:2011-06-14 11:09:43

标签: events vb6 activex-exe

我在用户控件上有一个网格,它位于用户文档vbd页面上,该页面位于ActiveX exe应用程序中 这是我在网格上按F5时得到的事件

   Private Sub mnuRightClickRefresh_Click()
       'Call ...
   End Sub

当我在网格上按F3时 我得到了正确的活动

   Private Sub grdObjects_KeyUp(KeyCode As Integer, Shift As Integer)
       If KeyCode = 116 Then
        '...
       End If
   End Sub

有什么想法吗?

1 个答案:

答案 0 :(得分:1)

您似乎正在尝试在两个不同的函数中处理_KeyUp函数。 按F5键时,确保没有任何控件具有任何焦点(从而使表单成为焦点控件),然后您可以按以下方式处理事件:

     Private Sub grdObjects_KeyUp(KeyCode As Integer, Shift As Integer)
         Select Case KeyCode
              Case 116
                'Do Whatever F3 would want to do
              Case 118
                 'Do F5 Stuff
              Case 119
                  'Any other stuff for F6
          End Select
   End Sub

如果这是您想要的,请告诉我。