问题
单项选择题
在窗体上有一个名称为List1列表框和一个名称为Command1的按钮,List1的MultiSelect属性设置为2。当单击Command1按钮时,将会把所有选中的选项全部删除。下列程序缺少的一句是______。
Private Sub Command1_ Click ()
for i = List1. ListCount- 1 To 0 Step- 1
if ______ = True then
List1. RemoveItem i
End if
Next i
End Sub
A.List1.Select(i)
B.List1.Sort(i)
C.List1.List(i)
D.Ltst1.Select(List1.Listindex)
答案
参考答案:A
解析: 列表框有一个数组属性Select,它的每一个元素用来记下相应下标的选项是否被选中,如果相应下标的选项被选中,该元素的值为True,否则为False。要删除列表框中被选中的选项,可一一判断列表框的Select数组属性中的每一个元素值,如果是True,则把与它下标一致的选项删除。