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

Private Sub Command2_Click() HScroll1.Min=0 HScroll1.Max=List1.ListCount HScroll1.Value=0 Timer1.Interval= Timer1.Enabled=True End Sub Private Sub Timer1_Timern If List1.ListCount＞0 Then List1.RemoveItem 0 HScroll1.Value=HScroll1.Max--Listl.ListCount Else Timer1.Enabled= MsgBox'全部删除!' End If End Sub

A.1秒删除一项，直到删完为止，用一滚动条来显示删除的项目，请选择合适的语句，完成此程序(
B.shangxueba.cn/images/ct_ctvbbm_choose_00310(20092).jpg'
C.Min=0
D.Max=List1.ListCount
E.Value=0
F.Interval=
G.Enabled=True
H.ListCount＞0
I.RemoveItem
J.Value=HScroll1.Max--Listl.ListCount
K.Enabled=
L.100
M.0.1
N.100
O.0.1