文字列の連結を inc にしたんですね。 連結は長さの2乗で遅くなるので悲惨なことになりますよね。 22-24行目は z[i_]=asc(g$[i_]) でいいのではないかな?? (未確認) 10 行目は dim cl[0], i, g$ にしましょう。i がローカル変数になり、グローバル変数と干渉しなくなります。 20 行目も dim z[len(g$)], i_, b$, cgg にしましょう。 (そうすればそもそも i_ などと妙な変数名使わずに済む。)