Code:
For counter1 = 0 to (number of checkboxes-1)

    If chkBox(counter1).Value = vbChecked then

        counter2 = counter2 + 1
    EndIf
Next counter1
edit: you need to dimension everything correcty

------------------
Why Yes! I am a proud member of the SF Linux Hippy Club.

[This message has been edited by hobbes2112 (edited November 26, 2001).]