Have you set the Use Themes property to No?

Yes

Hi Ronald
You said "I have given it instructions to change name and change color and use bold white font and even though VBA says Yes, No, Skip.  ". It would help for us to see those instructions.

John

Details

Private Sub Q_1_1_Click()
    If Me.Q_1_1 = -1 Then
        Me.Q_1_1 = 0 ' No
        Me.Q_1_1.Caption = "NO"
        Me.Q_1_1.BackColor = RGB(255, 0, 0) ' Bright red
        Me.Q_1_1.ForeColor = RGB(255, 255, 255) ' Bright white
    ElseIf Me.Q_1_1 = 0 Then
        Me.Q_1_1 = Null ' Skip
        Me.Q_1_1.Caption = "SKIP"
        Me.Q_1_1.BackColor = RGB(0, 0, 255) ' Bright blue
        Me.Q_1_1.ForeColor = RGB(255, 255, 255) ' Bright white
    ElseIf IsNull(Me.Q_1_1) Then
        Me.Q_1_1 = -1 ' Yes
        Me.Q_1_1.Caption = "YES"
        Me.Q_1_1.BackColor = RGB(0, 255, 0) ' Bright green
        Me.Q_1_1.ForeColor = RGB(255, 255, 255) ' Bright white
    End If
End Sub

Copy

First, consider giving your Toggle Button a more descriptive name.
If the Forecolor isn't changing you can just set it at design time.
You don't need to repeat the Me keyword for fields on the current form.
Put the Null as an Else condition.

    If ToggleButtonName = True Then
        ToggleButtonName.Caption = "YES"
        ToggleButtonName.BackColor = RGB(0, 255, 0)
    ElseIf ToggleButtonName = False Then
        ToggleButtonName.Caption = "NO"
        ToggleButtonName.BackColor = RGB(255, 0, 0)
    Else
        ToggleButtonName.Caption = "SKIP"
        ToggleButtonName.BackColor = RGB(0, 0, 255)
    End If

I would put this code in the After Update event.

Thank you Kevin for taking the time to respond.   Given today is Sunday, I won't be able to test your suggestions until tomorrow.   The name is one of about forty similar names that represent questions, page and section of multiple forms.  Thus, it is targeted to describe the specific question being asked and answered.   I do have the forecolor property set to white in the design.   I can certainly change those other things.   I am particularly curious about the after update event move from on click.   I have tried this in multiple variations but always on click.    I tried using vbGreen instead of RGB codes.  I tried theme off and on.   I tried deleting the assigned background colors but colors always sprang back.  Colors may have changed but never to the desired color I want after testing.  Thank you again.   I will post results tomorrow.  Best.

Unfortunately, the move from On Click to After Update did nothing for the situation.   I also tested it After Update by setting No to the Theme but all that did was change the color of the toggle to white, white, and white.   Unless someone can give Access a pill to cure it of this phobia it has for green toggle buttons, I will resign myself to blue, red and blue which is far better than white, white and white.  Thank you Kevin for your suggestions.

Try not setting the button value.  Let it toggle itself.  

For the -1 value, try using the pressedcolor and pressedbackcolor options like this:

ElseIf Me.Q_1_1 = -1 Then
    Me.Q_1_1.Caption = "YES"
    Me.Q_1_1.PressedColor = RGB(0, 255, 0) ' Bright green
    Me.Q_1_1.PressedForeColor = RGB(255, 255, 255) ' Bright white

For the 0 and Null states, you can try changing the hover color as well if you like that look.

You may be stuck with light gray forecolor for the NULL state.

Matt.   Thank you.    Oddly, your PressedColor property worked for the green but not for the Blue or Red.  However, that doesn't matter.   I simply left their BackColor property as it was and used the PressedColor property for my green.   It works now as I wanted.

The PressedColor seems to be the ON color for the toggle -- only when the toggle has a True value (-1) -- and the BackColor is the OFF color for the toggle.  Your toggle is only ON during your "green" condition.

FWIW, I usually use Labels, to do what you have described. Sometimes, Buttons, if I need the extra function like gradient and shape properties.   You have already done all of the work in your code.  Just evaluate the label/button caption to trigger your if statements.

If Me.Q_1_1.Caption = "YES" Then

Glad to help