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

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

admin2019-04-29  75
问题 设窗体上有一个名称为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
Next k
If k＜List1．ListCount Then
   List1．Removeltem k
Else
  List1．Addltem
  End If
End Sub   
为使上面程序可以实现该功能，程序代码中横线上应该填入的代码是
选项 A、k
B、Checkl．Caption
C、Checkl(k)
D、Checkl(Index)．Caption
答案D
解析 横线处应该填写要添加进列表框的项目内容，本题要求添加复选框的标题，由于复选框是一个控件数组，要想确定某一个具体的复选框需要使用控件数组的下标来访问到控件，然后取出标题属性添加进列表框中。
转载请注明原文地址:https://kaotiyun.com/show/21Up777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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