How to handle Checkbox value in VBA?

I have the following example:

Private Sub setCheck(ByVal val1 As Boolean, ByVal val2 As Boolean, ByVal val3 As Boolean)
    With userForm1
        .checkboxOne.Value = val1
        .checkboxTwo.Value = val2
        .checkboxThree.Value = val3
    End With
End Sub

Private Sub checkboxOne_Change()
    Call setCheck(True, False, False)
End Sub

Private Sub checkboxTwo_Change()
    Call setCheck(False, True, False)
End Sub

Private Sub checkboxThree_Change()
    Call setCheck(False, False, True)
End Sub

It is possible to click a check only in one direction. That means, if I clicked the checkboxOne first time, I don't have the ability to check it again. What I need to do?