【单选题】

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

Private SubCommand2_Click() HScro111.Min=0 HSero111.Max=List1.ListCount HScro111.Value=0 Timer1.Interval= Timer1.Enabled=True End SubPrivate Sub Timer1_Timer() If List1.ListCount＞0 Then List1.RemoveItem 0 HScro111.Value=HScrolll.Max-List1.ListCount Else Timer1.Enabled= End IfEnd SubA．100 False
B．0.1 True
C．100 True
D．0.1 False