Question

vb编程如何在label中显示checkbox数组中的多个选中内容

Answer 1

再添加一个命令按钮
Command1，下面是点击按钮后，在Label1中显示CheckBox控件数组选中的内容
Private
Sub
Command1_Click()
Dim
i
As
Integer
Dim
strText
As
String
For
i
=
0
To
Check1.UBound
If
Check1(i).Value
<>
0
Then
strText
=
strText
&
Check1(i).Caption
&
vbCrLf
'vbCrLf
是回车
End
If
Next
Label1.Caption
=
strText
End
Sub