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

admin2010-11-20  34

问题 某程序列表框中有许多项,现在用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。
转载请注明原文地址:https://jikaoti.com/ti/qpg0FFFM
0

最新回复(0)