Toggle form Button Color

[rpaulson]

Hello all,

I designing a user form for a touch screen monitor.
I have a form with 9 buttons. (CommandButton1 thru 9)
The user will be allows to select as many as they wish before they press the OK button.

I need a way to change color when the user toggles the button on\off.

Thanks for taking a look.

Ross

 

[Rasm]

try this

Private Sub NameOfCommandB_Click()

NameOfCommandB.backColor = Hex number

end sub



In the properties Window you can view the Palette with all the colors - take your pick then copy paste the Hex number into your code as above - hope I understood your question

 

[rpaulson]

Rasm,

your code changes the background color.
I need some code that will toggle colors when button is pressed\depressed.

Ross

 

[Rasm]

Exactly -

If BackColor=Red then Backcolor = green

is this not what you are looking for? - if not clearify

 

[Rasm]

if Textbox.text="On" then backcolor = Green

and so on

 

[rpaulson]

The light bulb came on

Private Sub CommandButton1_Click()
    With CommandButton1
        If .BackColor = &H8000000F Then .BackColor = &HC0C0FF Else .BackColor = &H8000000F
    End With
End Sub

Thanks for the help.

 

[Rasm]

Salll goood