VAR A[100]またはDIM A[100]と なっていた場合、 While I<100 For I=0 to 1 step 1 ？A[I] Wend とすれば多分いけます。