Private Sub DataGridView1_RowLeave(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.RowLeave 'もしも支持するコントロールの名前とグリッドビューの名前が違ったら強制終了 If Me.ActiveControl.Name <> Me.DataGridView1.Name Then Exit Sub 'データグリッドビュー全ての行の背景色を白色にする For i As Integer = 0 To Me.DataGridView1.Rows.Count - 1 Me.DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.White Next End Sub