a.0〜a.4までつくって全部に１を代入したいんですが、
dim a,5 = 1　とやるとエラーが出ます。
ループとか使って全部に=1をしなければいけないんでしょうか？