Ma non si fanno così le array?

[freezone]

11 Dim arrProva()
12 For i = 0 to 4
13	arrProva(i) = i & "
"
14 Next

Perchè mi dà:
Microsoft VBScript runtime error '800a0009'

Subscript out of range

/array.asp, line 13