Switching 3 colors on Form

[georgiboy]

Maybe the below will help:

Sub btnMyButton_Click()   
   '   The background color is gray at the beginnng
    Select Case frmMyForm.BackColor
        Case -2147483633 ' grey (none)
            frmMyForm.BackColor = vbYellow
        Case 65535 ' yellow
            frmMyForm.BackColor = vbRed
        Case 255 ' red
            frmMyForm.BackColor = vbBlue
        Case 16711680 ' blue
            frmMyForm.BackColor = vbYellow
    End Select
End Sub