arrays

this is wut i have



Dim array(3)


For x = 0 To 3

a$ = Input("? ")
array(x) = a$
Next


For x = 0 To 3

Print array(x)
Next


and all i get is 0's for the array position