DirectDraw Automation Error

[Joebob]

I started using DirectX 7 in Visual Basic a few days ago, but I'm familiar with most of the concepts.

I am making this game, and I got the main menu to work but then I did something and now it will not let me quit out of my menu. Then when I switch out using ALT+TAB VB tells shows a dialog box that says:

Run-time error '-2005532222 (887601c2)':
Automation error

Then if I click on the debug button it says the error is with the code that flips the primary buffer which is:

Primary.Flip Nothing, DDFLIP_WAIT

I am using Direct Draw if you could not tell. Can somebody please help me? I have included the whole project in a .zip file. There is also some Direct Sound code in the project.

Thanks,
Joebob

P.S. This is pretty clean and easy to read code! (at least it is compared to my other code )