某程序列表框中有许多项，现在用Timer控件控制时间，0.1秒删除一

问题单项选择题

某程序列表框中有许多项，现在用Timer控件控制时间，0.1秒删除一项，直到删完为止，用一滚动条来显示删除的项目，请选择合适的语句，完成此程序( )。

Private Sub Command2_Click() HSeroll1.Min=0 HScroll1.Max=List1.ListCount HScroll1.Value=0 Timer1.Interval=______ Timer1.Enabled=True End Sub Private Sub Timer1_Timer() If List1.ListCount>0 Then List1.RemoveItem 0 HScroll1.Value=HSeroll1.Max-List1.ListCount Else Timer1.Enabled=______ MsgBox"全部删除!" End If End Sub

A．100 False

B．0.1 True

C．100 True

D．0.1 False

答案

参考答案：A

解析：本题的难点在于考生能从全局上读懂代码，在按钮的单击事件中，设置时钟控件的时间间隔，其单位是毫秒，所以0.1秒应设置为100毫秒；在Timer事件中，如果已经全部删除列表框中的内容，则应将Timer1关闭，不再执行删除操作，所以Enabled属性应该设置为False。