Prima del For fai un Redim A(N) inizializzando a al valore di N.