如何使用ADODB在表单中显示复选框 [英] How to display Checkbox in form using ADODB

问题描述

美好的一天:

我在与我的项目有关的问题..

问题是:
我想在FORM USING ACCESS 2003中显示保存的文件.所有文本框都显示它的数据，但CHECKBOX除外.
这里有人愿意为我的项目提供帮助吗?

这是我的代码:

Good Day:

Im Having a problem regarding with my project..

The problem is:
I want to show the saved files in FORM USING ACCESS 2003. all text boxes shows It''s data except for CHECKBOX..

Is anyone here who is willing to help regarding with my project?

HERE''S MY CODE:

Public Sub FillFields()
    If Not (rs.BOF = True Or rs.EOF = True) Then
        Text7.Text = rs.Fields("Field2")
        Text8.Text = rs.Fields("Field3")
        Combo1.Text = rs.Fields("Field1")
        Text9.Text = rs.Fields("field4")
        Text10.Text = rs.Fields("field5")
        Text11.Text = rs.Fields("field6")
        Text12.Text = rs.Fields("field7")
        Text13.Text = rs.Fields("field8")
        Text14.Text = rs.Fields("field9")
        Check1.Value = rs.Fields("field10") <<<< PROBLEM
        Check2.Value = rs.Fields("field11") <<<< PROBLEM
    Else
        Text7.Text = ""
        Text8.Text = ""
        Combo1.Text = ""
        Text9.Text = ""
        Text10.Text = ""
        Text11.Text = ""
        Text12.Text = ""
        Text13.Text = ""
        Text14.Text = ""
        Check1.Value = 0
        Check2.Value = 0
        Check3.Value = 0
        Check4.Value = 0
        Check5.Value = 0
        Check6.Value = 0
        Check7.Value = 0
    End If
End Sub

错误说:

运行时错误''380'':
无效的属性值

Check1.Value = rs.Fields("field10")在这里是错误的亮点


充满爱心的大帮助...
我很快就回答了.
谢谢！！！！！ @ .. @

the error says:

Run Time Error ''380'':
Invalid Property Value

The Check1.Value = rs.Fields("field10") here is the highlight of error


BIG HELP WITH MUCH LOVE...
I NID ANSWER ASAP..
THANKS!!!!! @..@

推荐答案

我在这里回答了您，您看到了吗: ^ ]

I replied you here, did you see: Search checkbox using adodb[^]

这篇关于如何使用ADODB在表单中显示复选框的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！