2. 计算机
  3. 设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。 Private Sub Check

设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。 Private Sub Check

admin2016-06-23  52
问题 设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。
Private Sub Check1_Click(Index As Integer)
For k=0 To List1．ListCount-1
If Check1(Index)．Caption=List1．List
(k)Then
Exit For
End If
Next k
If k＜List1．ListCount Then
List1．RemoveItem k
Else
List1．AddItem______________
End If
End Sub
为使上面程序可以实现该功能，程序代码中横线上应该填入的代码是
选项 A、k
B、Check1．Caption
C、Check1(k)
D、Check1(Index)．Caption
答案D
解析 题干给出的是没有该复选框的标题时，把该复选框的标题添加到列表框中。List1．AddItem可以为列表框添加新项。需要添加的项要根据索引添加。选D。
转载请注明原文地址:https://www.kaotiyun.com/show/5vLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)