vb.net DataGridView 滚动条拖放屏幕闪烁

    Dim cc As Integer
        Dim rr As Integer
        n_val = e.Value
        If Trim(o_val) <> Trim(n_val) Then
            '' MsgBox("数2据改变" & o_val & "--" & n_val)
            cc = DataGridView1.CurrentCell.ColumnIndex   '当前列号
            rr = DataGridView1.CurrentCell.RowIndex '当前行号
            DataGridView1.Rows(rr).Cells(cc).Style.BackColor = Color.Green  '改变颜色
            DataGridView1.Refresh()
        End If

其中上面代码中，  DataGridView1.Rows(rr).Cells(cc).Style.BackColor = Color.Green  '改变颜色 拿了，屏幕不会闪烁了