Private Sub DataGridView1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles DataGridView1.KeyPress

        For i As Integer = 0 To Me.DataGridView1.Rows.Count - 2 ' -1 Se AllowUserToAddRow è impostato su false
            Dim stringSerch As String = Me.DataGridView1.Item(3, i).Value 'Imposta l'index della colonna su cui vuoi effettuare la ricerca (in questo caso è la terza)
            If stringSerch.StartsWith(e.KeyChar, StringComparison.CurrentCultureIgnoreCase) = True Then
                Me.DataGridView1.Rows(i).Selected = True
                Exit Sub
            End If
        Next

    End Sub