For Each r As DataGridViewRow In DataGridView1.SelectedRows
If Not r.IsNewRow Then
DataGridView1.Rows.Remove(r)
End If
Next
其实就是一个IsNewRow属性，判断是不是为新选中的行，如果不是，remove！