题目内容
(35 ) 在窗体上有一个名称为 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(k).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(Index).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
查看答案
搜索结果不匹配?点我反馈
更多问题