Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
control.NullColor = Color.Coral;
control.AllowNull = true;
control.CausesValidation = true;
control.Text = "";
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
control.ResetNullColor()
End Sub