Key Press on ReportControl

Private Sub wndReportControl_KeyDown(KeyCode As Integer, Shift As Integer)

    If KeyCode >= vbKeyA And KeyCode <= vbKeyZ Then
        ' iterate all Rows of the wndReportControl
        '' get Row's Record and iterate all Record Items
        ''' Find whether pressed character does exist in Item's string
        '''' If so, set FocusedRow to currently iterated Row
    End If
End Sub