作业帮 > 综合 > 作业

在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空.程序运行时

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/05/29 07:57:13
在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空.程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中.下面能实现此功能的事件过程是.
A:Private Sub Check1_Click(Index As Integer)
Text1.Text = ""
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(Index).Caption & " "
End If
Next k
End Sub
B:Private Sub Check1_Click(Index As Integer)
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " "
End If
Next k
End Sub
C:Private Sub Check1_Click(Index As Integer)
Text1.Text =""
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " "
End If
Next k
End Sub
D:Private Sub Check1_Click(Index As Integer)
Text1.Text = ""
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " "
Exit For
End If
Next k
End Sub
在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空.程序运行时
C