I have an Access database which has a checkbox that I need to see if it's "false" or "true" as I go from record to record. If the checkbox is true the label font color and name should change. 

This is my code but it's not working properly:

```
Private Sub Check796_Click()
  lngRed = RGB(255, 0, 0)
    lngBlack = RGB(0, 0, 0)
    If Me.Check796 = vbTrue Then
       Me.Label797.Caption = "Hold"
       Me.Label797.ForeColor = lngRed
    Else
       Me.Label797.Caption = "UnHold"
       Me.Label797.ForeColor = lngBlack
    End If    
End Sub

```

If it's checked it should be red and say "Hold" but, if it's unchecked it should say "UnHold". If I check the "Hold" checkbox it's works but, when I go to the next record which is unchecked it says "Hold" as well. When I close the application and go back into the record with the checkbox clicked the label says "UnHold" when it should say "Hold".