更改复选框的值

Question

我通过表格向表中添加一行新的数据。在表单上我也有复选框，它也被集成到表格中。选中复选框会导致值为-1。是否可以将-1更改为用户定义的值，例如'x'？

Answer 1

答案很简单：第

更复杂的回答：你可以使用一个隐藏的约束场，一个未绑定的复选框，VBA和默认值，以使该行为就像一个约束复选框，返回不同的值的复选框。

考虑两个字段，myUnboundCheckbox和myBoundTextfield。 myBoundTextfield对于True拥有"X","Y"对于False。 myUnboundCheckbox是未绑定的复选框，myBoundTextfield是一个隐藏的绑定文本字段

然后你可以使用以下命令：

Private Sub myUnboundCheckbox_AfterUpdate() 
    If myUnboundCheckbox Then 
     myBoundTextfield = "X" 
    Else 
     myBoundTextfield = "Y" 
    End If 
End Sub 

Private Sub Form_Current() 
    myUnboundCheckbox = myBoundTextfield = "X" 
End Sub