print したり beep したりすると、何を計ってるかわからなくなりますよ。 print も beep もしないで、 wait t0=maincnt while a < 20000 'while の中は同じでいいです。ただし ? と beep しないこと wend ? (maincnt - t0)/60 これの実行結果なら、まず、計算速度そのものを計れると思います。