Could anyone help me in debugging this very very simple Direct Draw program?

I really need someone to debug a verwy short VB program about DirectDraw. It should be correct, as I built it according to the instructions I found in a DirectX documentetion by Microsoft, but I cannot make it work.
NEMinis , MM



:confused: