Question

vb6+checkbox 选中数

如何判断form中checkbox的选中个数？我是想通过checkbox的选中个数来给timer控件的interval属性赋值，如果选中个数较少的话interval的值设小一点，反之则设大一点，最好能有具体的判断选定个数的代码
是在VB6中，不要其他编程环境的代码，只要VB6.0的

Answer 1

代码为：

需要说明的是  用的是控件数组   即   先在form上画一个CheckBox然后复制粘贴三个  在放个文本框   再把代码复制进去就行了  下面有界面图片 

Private Sub Check1_Click(Index As Integer)

Dim n As Integer

n = 0

For i = Check1.LBound To Check1.UBound

    If Check1(i).Value = Checked Then

        n = n + 1

    End If

Next i

Text1.Text = n

End Sub

图片为：