Checkbox skal ændre værdi i forespørgsel

Hej Eksperter

Jeg kan ikke rigtig finde ud af hvordan jeg skriver koden hvis jeg vil have en checkbox i min formular til at være afkrydset hvis et felt i en forespørgsel har én værdi og ikke afkrydset hvis feltet er tomt.

Desuden skal det være sådan at når man afkrydser/sletter afkrydsning i formularen så skrifter feltet i forespørgslen værdi:

Jeg har prøvet noget i stil med:

Private Sub Form_Current()

If Me.cmdMedlem = True Then
      Me.[User Field 1] = "1"
    ElseIf Me.cmdMedlem = False Then
      Me.[User Field 1] = Null
  End If

______________________________________________________   

End Sub

Private Sub cmdMedlem_Click()

If Me.[User Field 1] = Null Then
      Me.[User Field 1] = "1"
    ElseIf Me.[User Field 1] = "1" Then
      Me.[User Field 1] = Null
  End If

End Sub

Håber I kan hjælpe endnu en gang :)