MS Access连续窗体绑定复选框如何实现仅单个ID设为默认值

连续窗体中绑定复选框、单选按钮无法实现跨记录互斥单选是Access的固有特性：连续窗体的重复控件会逐行绑定对应记录的字段值，原生控件没有跨记录互斥的逻辑，无论是直接用复选框还是选项组内的单选按钮，都不会在选中某条记录时自动取消其他记录的选中状态。
可按以下步骤实现需求，不需要换特殊控件：

实现步骤 #

• 第一步：调整表结构
  给存储业务数据的表新增IsDefault字段，字段类型为「是/否」，默认值设为0（即“否”），专门用来标记默认项。
• 第二步：配置窗体控件
  连续窗体中保留绑定到IsDefault字段的复选框控件即可，不需要替换为单选按钮选项组。如果偏好单选按钮的圆点视觉效果，可以直接把复选框的「特殊效果」属性调整为选项按钮样式，视觉表现和单选按钮完全一致。
• 第三步：添加互斥更新逻辑
  给复选框控件添加AfterUpdate（更新后）事件，写入以下VBA代码：

  Private Sub chkIsDefault_AfterUpdate()
      ' 仅当当前记录被勾选为默认项时，清空其他所有记录的默认标记
      If Me.chkIsDefault = True Then
          ' 直接执行SQL批量更新，比遍历记录集执行效率更高
          CurrentDb.Execute "UPDATE 替换为你的实际业务表名 SET IsDefault = 0 WHERE 主键ID字段名 <> " & Me!主键ID字段名, dbFailOnError
      End If
      ' 刷新窗体同步所有行的控件显示状态
      Me.Requery
  End Sub
  

  注意把代码里的表名、字段名、控件名替换为你自己项目里的实际命名。

额外优化建议 #

• 增加表级数据校验：打开业务表的设计视图，添加表级验证规则DCount("*","替换为你的实际业务表名","IsDefault = -1") <= 1，设置验证提示文本为「仅允许设置一个默认项」，即使用户绕过前台窗体直接修改后台表数据，也不会出现多个默认项的异常情况。
• 不要在连续窗体中使用未绑定控件做单选：连续窗体中所有未绑定控件会在所有行显示完全相同的值，无法实现逐行独立选择的效果。
• 不要在连续窗体中使用选项组容器承载单选按钮：选项组是单值控件，绑定后只会存储单个值，在连续窗体中会出现所有行同步显示相同选项的问题，完全无法适配逐行记录的选择场景。

内容的提问来源于stack exchange，提问作者Dil Dilshan