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

在窗体上有一个名称为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