Private Sub setDGViewColor()
Dim theRow As DataGridViewRow
For Each theRow In Me.dgvList.Rows
If theRow.Cells(7).Value.ToString() = "Deleted" Then
theRow.DefaultCellStyle.BackColor = Color.Gray
Else
theRow.DefaultCellStyle.BackColor = Color.Black
End If
Next
End Sub