如何用键盘上下键来控制gridview list行的选择

' selected girdview rows using keyboard operate
    Private Sub gdv_route_points_list_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles gdv_route_points_list.KeyDown

        Dim index As Integer = Me.gdv_route_points_list.SelectedRows(0).Index
        If index < 0 Or index > Me.gdv_route_points_list.Rows.Count Then
            Return
        End If
        If e.KeyValue = &H26 And index > 0 Then
            Me.gdv_route_points_list.Rows(index - 1).Selected = True
            Me.gdv_route_points_list_CellClick(Nothing, Nothing)
        ElseIf e.KeyValue = &H28 And index < Me.gdv_route_points_list.Rows.Count - 1 Then
            Me.gdv_route_points_list.Rows(index + 1).Selected = True
            Me.gdv_route_points_list_CellClick(Nothing, Nothing)
        End If

    End Sub