窗体上有 1 个名称为 List1 、含有 3 个项目的列表框 , 1 个名称为 Text1 的文本框 , 以及 1 个 Interval 属性值为 1000 的计时器控件 Timer1 。某人编制了以下程序,希望程序运行时,每隔 1 秒, List1 中的 3 个项目能够依次在 Text1 中循环显示。 Private Sub Timer1_Timer() Dim i As Integer Text1.Text = List1.List(i) i = i + 1 If i = List1.ListCount Then i = 0 End If End Sub 运行程序 , 发现有错误。以下正确的修改是 ________ 。