>>112
A(E)=0 の時、E=E+1 は無視されます。ですのでA(0)〜A(E)の値が全て0の時、
Eの値が一つ減っていって、for E=B to 0 step -1のループを抜けることに
なります。その上でD=9だと計算終了、そうでなければ for E=0 to B から
やり直しとなります。

for〜nextのループは、stepが正の数の時、変数の値がtoの後の値より大きい
とループ内は無視され、逆に負の数の時は、変数の値よりtoの後の値が
大きいと無視されます。ついでにstepが0の時、変数の値よりtoの後の値が
大きいと無限ループになり、等しいまたは逆の時は無視されます。

E=E+1が無視されることについて詳しく言うと、
stepを省略したfor〜nextは、step 1の時のfor〜nextと同じ働きを
しますので、for F=0 to E のループで、もし A(E)=0 の時、Gに0
が代入され、その後の for H=1 to B*G でtoの後の値が0になり、
変数Hの値が１、stepの値が正の数なのでループ内が無視される
ということです。