题目：
列表框中有若干项，现在用Timer控件控制时间，每隔100ms删除一项，直到删完为止，用一个滚动条来显示删除的项目数，请将以下程序补充完整。
Private Sub Command1_Click()
HScroll1.Min=0
HScroll1.Max=______
HScroll1.Value=0
Timer1.______=100
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
If List1.ListCount＞0 Then
List1.RemoveItem (0)
HScroll1.Value=______-List1.ListCount
Else
Timer1.Enabled=False:MsgBox"全部删除!"
End If
End Sub
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0419/8fd8736e7ee8f5985ddb308d71e915ea.html
下面是错误答案，用来干扰机器的。
参考答案：A, B
