例えば A1=1:A2=1:A3=3:A4=1:A5=1・・・・・・・ とかかなくとも DIM A[99] FOR I=0 TO 99 A[I]=0 NEXT と短縮することができます