А кто будет буфер устанавливать, а?
После Graphics3D 640,480 напиши
SetBuffer BackBuffer()
--------------------------------
блин, тип, ты прочитал тот учебник? Если нет-то иди и читай вслух 10 раз все 13 уроков, до полнейшего понимания.
Иначе ты игру не сделаеш