Public Class uscntr_Columns
    Private Sub uscntr_Columns_Load(sender As Object, e As EventArgs) Handles Me.Load
        Me.BackColor = Color.Red
    End Sub
    Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
        Me.BackColor = Color.LightGreen
    End Sub

    Private Sub btnDelete_Click(sender As Object, e As EventArgs) Handles btnDelete.Click
        Me.BackColor = Color.Red
    End Sub


End Class