Question

VB中我需要限制复选框被选的个数

我建立了10复选框，有什么方法能限制用户只能选中其中的5个复选框？
能给代码的给个~！谢谢

Answer 1

你这样的做法最好是把所有的10个checkbox都做成一个控件数组
Private Sub Check1_Click(Index As Integer)
Dim i As Integer
Dim num As Integer
num = 0
For i = 0 To 9
If Check1(i).Value = 1 Then
num = num + 1
End If
Next
If num > 5 Then
MsgBox "您已选择了5个"
End If
End Sub