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

Answer 2

给个示例兆宽春.有两个的族耐情况巧昌
Private Sub Check1_Click()
Label1.Caption = Label1.Caption & Check1.Caption
End Sub

Private Sub Check2_Click()
Label1.Caption = Label1.Caption & Check2.Caption
End Sub