vb编程如何在label中显示checkbox数组中的多个选中内容
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
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
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
