>>339
VBはプロパティへのアクセスが遅い。
ボールやブロックのWidthやHeightは変数か定数にしたほうがいい。
shpball.Topはshpball.Heightも、ループの中で何度も参照するなら、
変数に格納。