[填空题] 某程序列表框中有许多项，现在用Timer控件控制时间，100ms删除一项，直到删完为止。用一滚动条来显示已删除的项目，完成此程序。 Private
2021-07-20
[填空题] 某程序列表框中有许多项，现在用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 List.ListCount＞0 Then
List1.Removeltem(0)
HScroll1.Value=______-List1.ListCount
Else
Timer1.Enabled=False
MsgBox”全部删除!”
End If
End Sub
正确答案：List.ListCount；Interval；HScroll1.Max
词条内容仅供参考，如果您需要解决具体问题
（尤其在法律、医学等领域），建议您咨询相关领域专业人士。