Ms access 复选框控制使用

我以复选框的形式创建了一个控件，激活它后，某些控件将变为可见。。停用后，控件将不可见。我的问题在表格上。第一次选中mousedown事件上的复选框时，不会发生强制用户取消选择它，然后重新选择它的情况。。在重新选择时，它工作正常。。我想我需要在某个地方做一些刷新，但我不知道如何。。有人能帮我一下吗？下面是我的代码。。谢谢

Private Sub cmdAccounting_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Me.cmdAccounting = 0 Then
    cost.Visible = True
    Etichetta35.Visible = True
    Etichetta37.Visible = True
    Etichetta43.Visible = True
    qty.Visible = True
    tot.Visible = True
    lineaAccounting1.Visible = True
    lineaAccounting2.Visible = True
    Me.FileSaved.Visible = False
    Me.lblFileSaved.Visible = False
Else
    cost.Visible = False
    Etichetta35.Visible = False
    Etichetta37.Visible = False
    Etichetta43.Visible = False
    qty.Visible = False
    tot.Visible = False
    lineaAccounting1.Visible = False
    lineaAccounting2.Visible = False
    Me.FileSaved.Visible = True
    Me.lblFileSaved.Visible = True

End If
Me.Form.Refresh
End Sub

---

我建议您继续将代码转移到它自己的Sub，比如Sub updateControl。然后可以在两个位置调用该子控件：Form_Current和任何应更改状态的控件的_AfterUpdate事件。删除Me.Form.Refresh行。Form_current在显示第一条记录时触发，并且在用户导航时再次触发。当复选框在记录中更改时，AfterUpdate将触发