I've a program developed under VB6. It uses Reportcontrol to show/edit data, but the only way to edit a item is clicking once with mouse. There is a way to edit reportcontrol using the cursor keys to navigate across the items of the selected row?

 

I've tried using the following code:

 

Private Sub REPORTCONTROL_KeyDown(KeyCode As Integer, Shift As Integer)
If REPORTCONTROL.SelectedRows.count = 0 Then Exit Sub
If KeyCode <> 40 And KeyCode <> 39 And KeyCode <> 38 And KeyCode <> 37 Then
    REPORTCONTROL.EditItem REPORTCONTROL.SelectedRows(0), REPORTCONTROL.Columns(1)
End If
End Sub

 

The problem is that when the user press the key only can edit the item of the column 1.

 

Thanks in advance.