vb 窗体中5个checkbox 如何遍历这5个checkbox控件

[hinada99]

窗体中添加了5个checkbox
分别 叫 checkbox1,2,3,4,5。想通过代码将他们的Text属性设置为1,2,3,4,5.

比如

for i=1 to 5

checkbox"i".Text=1

Next

这个具体怎么写

[aqz2002]

checkbox用控件数组

建立5个checkbox

dim i
for 0 to 4
checkbox(i).text= i+1
next i

[hinada99]

aqz2002
--！
不能使用check(i) 引用

[熊孩子开学喽]

用控件数组就可以了:
先放一个CHECKBOX到窗体,然后选中它,按CTRL+C,点窗体空白处按CTRL+V,就会提示建立控件数组了.
访问时就可以用类似Check1(index)的方法去循环遍历了.

[无·法]

Dim obj As Control
For Each obj In Me.Controls
    If TypeName(obj) = "CheckBox" Then
        obj.Value = 1
    End If
Next

[无·法]

Dim i%
For i = 1 To 5
    Me("checkbox" & "i").Text = i
Next

checkbox有text属性吗？只有value吧？只能接受0、1、2

[无·法]

上面代码错了应该是：

Dim i%
For i = 1 To 5
    Me("checkbox" & i).Text = i
Next

[hinada99]

sysdzw
3q