ms-access - MS Access VBA bool 值本地化问题

Question

我在 MS Access 数据库(当前 Office 365 Access 版本)中的 VBA 中构建了一些 SQL 查询字符串，但遇到了一个奇怪的从表单控件读取 bool 值的本地化问题:Me .MyBooleanControl 返回“Wahr”(德语“True”)=> 生成的 SQL 失败。

我现在正在使用一种解决方法，通过函数包装每个值请求，将值转换为 -1/0，如建议的 here ，但我真的很想知道是否有直接的方法来避免这种情况。去年，我在另一个 Access 数据库中使用了相同的代码结构，但没有遇到同样的问题 - 而且我完全不知道有什么不同(除了 MS Office 我已经更新)。

编辑:我找到了解决方案，请参阅下面的答案。

Answer 1

尝试独立于代码的其余部分重现问题，我确定了它并发现这是我的错误:我将未绑定(bind)的复选框初始化为True看起来工作正常，但导致了问题:

Private Sub Form_Load()
    Me.UnboundCheckbox01 = True
    Me.UnboundCheckbox02 = -1
End Sub

Private Sub ReadCheckBox()
    Debug.Print Me.UnboundCheckbox01 ' returns localized value "Wahr"
    Debug.Print Me.UnboundCheckbox02 ' returns -1 as expected

    ' after manually toggeling UnboundCheckbox01 to unchecked
    ' and back to checked again, the value returns as -1 too
End Sub

抱歉!下次我会遵守规则并提供一些代码 - 有时问题就通过这样做来解决......