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

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

admin2020-06-30  39
问题 设窗体上有一个名称为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://kaotiyun.com/show/oLHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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