Using variable in field name

[H. Martins]

Hi.

I have a table whose fields are named boolType00, boolType01,
boolType02, ..., boolType19.

I need to make a loop and real all of the 20 fields. Something like:

Dim i1 As Integer
i1=0
While i1 < 20
Debug.Print MyTable!boolType"i1"
i1=i1+1
Wend

Is there a way to do it?

Thanks
H. Martins

 

[Allen Browne]

If you OpenRecordset, you can refer to the field in the recordset like this:
Debug.Print rs.Fields("boolType" & i1)

If you need help with using a recordset, see:
http://allenbrowne.com/func-DAO.html#DAORecordsetExample

Lots of repeating fields like that usually indicates a bad design. For
details, see:
Don't use Yes/No fields to store preferences
at:
http://allenbrowne.com/casu-23.html

 

[H. Martins]

Ok, thanks.

That seem to work for fields but not for CheckBoxes.

I need to loop also by CkeckBoxes placed in a form.

I need to dynamicaly open some database and fulfill some form
checkboxes.

Checkboxes are named as chkbx00, chkbx01, ... , chkbx19.

The table is used to store some sort of previous configuration (nor
related to the data itself).

At form close inverse procedure will take place.

Thanks again,
H. Martins

 

[Allen Browne]

Dim i as Integer
For i = 0 to 10
Debug.Print Me("chkbx" & i).Value
Next

 

[H. Martins]

That's it.

Thank you Allen

H. Martins