有如下 VB 程序段 ：

Dim i As Integer

Dim a(1 To 9) As Integer

a(1) = 1: a(2) = 2

For i = 3 To 10

    a(i) = a(i - 1) * i

Next i

Text1.Text = Str(a(i))

运行程序，单击命令按钮Command1后，出现的错误提示为（  ）

A、下标越界

B、溢出

C、子程序或函数未定义

D、类型不匹配