Question

我正在尝试使用表单上绑定复选框的值设置表上的数字字段的值。如果选中则值必须为40，如果未选中则为0。我是新手，不知道从哪里开始。

不，复选框已添加到表单中，并绑定到表中的数字字段。数据是从一个使用大多数用户无法理解的代码的过时系统导入的，所以如果它在表中显示40我只希望表单显示为已选中，则所有其他值应显示为未选中，我希望用户检查/取消选中用于相应更新表格的复选框。

复选框用于指示客户是否提供了直接付款信息。 40意味着他们有，除了40之外的任何东西都意味着他们没有。

Answer 1

这样做的一种方法是在Access中使用VBA。在Access中访问VBA控制台的方式是，在表单的设计视图中，右键单击复选框控件并选择＆＃34; Build Event＆＃34;从菜单中。确保您的控件的三重状态设置为＆＃34;是＆＃34;在表单设计视图中的复选框的属性中。另外，请确保复选框的控制源指向表格中您要放置数据的字段。

请注意，在执行此操作之前，为控件的名称添加前缀是有帮助的......例如chkDebitInfo ...＆＃34; chk＆＃34;代表复选框。您可以通过单击“其他”选项卡更改控件的属性表中的名称，只需更改默认名称，这可能类似于Check625。此外，您希望将表字段的数据类型设置为＆＃34;整数＆＃34;所以它保留了价值。

一旦您进入VBA控制台，在选择了构建活动之后......您将看到控制的子程序。我为你做了样品：

Private Sub chkDebitInfo_Click()

If chkDebitInfo.Value = True Then
   chkDebitInfo.Value = 40         // Sets the checkbox to 40 if checked

ElseIf chkDebitInfo.Value = False Then
    chkDebitInfo.Value = 0        // Sets the checkbox to 0 if un-checked

End If

End Sub

我已经评论过设置复选框值的语句（如果选中或取消选中），因此您不必添加这些值。只需替换您的控件名称，或者如果您没有更改它，请使用默认名称，并且您很好。然后，选中或未选中复选框时，您将看到数据库表中填充的值。

或者，您可以将复选框设置为表单加载时的默认值，但您还没有说明，所以我不会进入它。希望这可以帮助。如果我需要进一步阐述，请告诉我。

使用表单复选框设置Access数据库表字段

1 个答案: