1. (2021高三上·浙江开学考) 某 VB 程序段如下：

Dim a(1 To 3) As Single，i As Integer

Randomize

a(1) = 1

For i =2 To 3

    a(i) = (Int(Rnd() * 3)) *2- 2

    a(i) = Abs(a(i - 1)) / Sqr(a(i))

Next i

List1.AddItem Str(a(i))

运行该程序段，下列错误提示不可能会出现的是（   ）