I'm fairly new to VB and decided I wanted to experiment with the checkbox control. Problem, I have three check box’s in a control array. I want to select one (checkbox1(X%).value = 1) and have the other two
checkbox(X%).value = 0 . This part works OK, it could be better, however the real problem is getting the
1 or 0 into the database. I’m using a simple DAO control and can’t get it to work. I get a type mis-match.

Here’s my codeBLUSH)

Private Sub Check1_Click(Index As Integer)
For X% = 0 To 2
Y% = X% + 1
If Y% = 3 Then Y% = 0
Z% = Y% + 1
If Z% = 3 Then Z% = 0
If Check1(X%).Value = 1 Then Check1(Y%).Value = 0
If Check1(X%).Value = 1 Then Check1(Z%).Value = 0
Next X%
Data1.Refresh
Data1.Recordset.AddNew
End Sub