某程序列表框中有许多项，现在用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

透平膨胀机为什么尽量避免低速运转？如何避免？其密封气的主要作用是什么？如果密封气压力低，后果怎样？