VB6 錯誤事件在 F5 上觸發

Question

我在用戶控件上有一個網格，它在用戶文檔 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

有任何想法嗎？

Answer 1

您似乎正在嘗試在兩個不同的函數中處理 _KeyUp function。 當您按 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

讓我知道這是否是你想要的。