[RESOLVED] How to set a button background to the default

[PickyBiker]

This should be easy, but I am having difficulty setting a button's background color back to the default state.
I tried 4 combinations as shown below but Button1's background never matches Button2's background. How can I match it?

Public Class Form1
    Public Sub run()
        Dim clr As Color
        clr = Control.DefaultBackColor
        'clr = DefaultBackColor
        'clr = SystemColors.Control
        'clr = Color.FromArgb(240, 255, 255, 255)
        Button1.BackColor = clr
    End Sub
    Private Sub Quit_Button_Click(sender As Object, e As EventArgs) Handles Quit_Button.Click
        Application.Exit()
    End Sub
    Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles Me.Shown
        run()
    End Sub
End Class

[jdc2000]

What happens if you save the background color of the button before changing it the first time? Can you then set it back to the saved color and have it be correct?

[PickyBiker]

Surprisingly saving the background color and then setting it to that doesn't work. Button1's background still doesn't match the original!
Here is how I tried that:

Public Class Form1
    Public Sub run()
        Dim oldclr As Color
        oldclr = Button1.BackColor
        Button1.BackColor = oldclr
    End Sub
    Private Sub Quit_Button_Click(sender As Object, e As EventArgs) Handles Quit_Button.Click
        Application.Exit()
    End Sub
    Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles Me.Shown
        run()
    End Sub
End Class

[Arve K.]

Button1.UseVisualStyleBackColor = True

[jdc2000]

Comment out the statement:
Button1.BackColor = oldclr
and run the program and create and post a screen capture of the button on the form.

Then uncomment that statement and re-run and post another screen capture of the same button.

[wes4dbt]

It seems from your code the reason it doesn't change color is because it's already set to that color. You never set the backcolor to anything else.

[PickyBiker]

Arve, adding

Button1.UseVisualStyleBackColor = True

fixed the problem.

Thanks!