Checkbox error

[pcpro]

I am trying to use a checkbox in my form connected to a access 97 database using ADO.

It works until I have a record that has the box checked. Then I get run-time error '380' Invalid Property Value.

Code:
chk_Equipment = !Equipment

I have tried:
chk_Equipment = !Equipment & " "
chk_Equipment = !Equipment & -1
chk_Equipment = !Equipment & "-1"
chk_Equipment = !Equipment & 0
chk_Equipment = !Equipment & "0"
chk_Equipment = !Equipment & Yes
chk_Equipment = !Equipment & "Yes"
But I get run-time error type mismatch.

The format in access for the checkbox is Yes/No. No is default.

Any Suggestions?

 

[RAtkison]

Have you tried
chk_Equipment = abs(!Equipment)
RKA

 

[chiph]

pcpro -

VB checkboxes have three potential values - checked, unchecked, and grayed-out. You should use the correct constant to check for each condition. Also, the exclamation-mark operator is going away in ADO.NET, so you might want to get accustomed to using the Fields collection. Default properties are going away too, so it might be good to start specifying the correct property as well.

[tt]
chk_Equipment.Value = IIf(adoRS.Fields("Equipment&quot.Value, vbChecked, vbUnchecked)
[/tt]

Chip H.

BTW. Unless your database doesn't allow a null for column "Equipment", you should check for a null condition with the IsNull() function.

 

[pcpro]

Thanks RAtkison the code worked...

Chiph I did not try yours but I am sure it would have worked also..

Thanks for the help Guys..