Private Sub DataGridView1_RowsAdded(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.DataGridViewRowsAddedEventArgs) Handles _
      DataGridView1.RowsAdded
        If e.RowIndex > 0 AndAlso DataGridView1.Rows(e.RowIndex - _
        1).Selected Then
            For i As Integer = 0 To e.RowCount - 1
                DataGridView1.Rows(e.RowIndex + i).Selected = True
                DataGridView1.FirstDisplayedScrollingRowIndex = e.RowIndex + i
                DataGridView1.CurrentCell = DataGridView1.Rows(e.RowIndex + _
                  i).Cells(0)
            Next
        End If
    End Sub