vb.net已经去掉了控件数组这个类，不过有个代替该方式的一个属性：tag，你可以把这些关联的tag属性设置为同一标记，如：a。然后遍历所有的checkbox并且tag为a的则选定：
成都创新互联是一家专业提供宁江企业网站建设,专注与网站设计制作、成都做网站、H5网站设计、小程序制作等业务。10年已为宁江众多企业、政府机构等服务。创新互联专业的建站公司优惠进行中。
protected
sub
chkall_click()
for
each
ctl
as
control
in
me.controls
''如果checkbox在一个容器里，比如groupbox，那可以用groupbox.controls
if
ctl.gettype().name.tolower()
=
"checkbox"
then
ctype(ctl,
checkbox).checked
=
checkbox3.checked
end
if
next
end
sub
Dim x(8, 8)
Dim a As Integer
Dim b As Integer
b = 0
For i = 0 To 8
For j = 0 To 8
If b = 3 Then
b = 1
a = a + 1
Else
b = b + 1
End If
x(i, j) = aNext
Next
你在最后两行之间加一行代码，看看数组的规模大小的结果；
Msgbox Ubound(cartnum)
