当焦点位于按钮上时，如何禁用Page Down/Up？

Question

我有一个程序，可以更改数据库中的值。我的表单中有一个TrueDBGrid，Page Down/Up工作正常。如果我用TAB键单击按钮，此Page Down/Up仍然有效。当焦点在按钮上时，我如何防止这种情况发生？

Answer 1

我找到了一个解决方案。这将是：

Private Sub frmZeitcodeListe_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
    Try

        If e.KeyCode = Keys.PageUp Then
            If cmdBearbeiten.Focused = True Or cmdLoeschen.Focused = True Or cmdNeu.Focused = True Or cmdSchliessen.Focused = True Then
                e.Handled = False
            Else
                bsTblZeitcode.MovePrevious()
                e.Handled = True
            End If

        ElseIf e.KeyCode = Keys.PageDown Then
            If cmdBearbeiten.Focused = True Or cmdLoeschen.Focused = True Or cmdNeu.Focused = True Or cmdSchliessen.Focused = True Then
                e.Handled = False
            Else
                bsTblZeitcode.MoveNext()
                e.Handled = True
            End If
        End If

    Catch ex As Exception
    End Try
End Sub