请教各位达人Access VBA Combox的用法

Question

在一个窗体上显示表中的一条记录信息，窗体上有一个combox 控件,控件有“是”和“否”两个选项值可选。
现在想让该combox控件与数据库中的字段相绑定,该字段在数据库中的值只有0和1两种，想让0对应“否”1对应“是”。
另外窗体的AllowEdits设为True,即用户对该窗体上的任何绑定控件地值进行了修改就自动更新到数据库中。请问如何实现？谢谢！

Answer 1

我的建议是你不要把combox 控件和字段直接绑定。在窗体上放一个看不见的文本框，跟字段绑定，然后在事件里把这两个控件关联起来。
窗体的Record Source 设好后，对绑定控件的值进行修改就会自动更新到基础表里去的呀。

Answer 2

不需要在vba裡面處理,直接修改Combo的屬性就好了
1.把Combo的資料來源類型設為  值清單
2.資料來源設為  是;1;否;0
3.欄數改為  2
4.結合欄位改為 2以上步驟就可以實現了

Answer 3

建议你用一个复选框Check或两个选项按钮Option来做【是与否】的数值绑定或选择。
方法：
一个复选框Check当被选中时，值为1。否则不被选中或没有选，值为0。
两个选项按钮Option则是一个值为1，另外一个为0，这个更容易做。

Answer 4

无需绑定,设置记录集中指针位置变化则Combox更新,
if RS("字段")=True then 
Combox.text="是"
else
.....
endif当Combox发生KeyPress,或是Click时更新数据库
如:
Private sub Combox_KeyPress(KeyAscii As Integer)
    If KeyAscii = vbKeyReturn Then
        if Combox.text="是" then 
            RS("")=true
        else
        ....
        endif
    endif
end sub