DirectDraw Automation Error

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 :) )

I don't think you attached the file. Please do that if you want us to look at it.
You could try just blitting the contents from the backbuffer to the primary display, instead of creating the primary display as a flippable surface.

What do you mean by that, you mean changing Primary.Flip Nothing, DDFLIP_WAIT to BackBuffer.Flip Nothing, DDFLIP_WAIT, I tried that but it didn't work. Sorry, I thought it got attached. I'll attach it here.

Thanx,
Joebob

I'll takea look at the code tommorow. But what I meant was just create aa normal surface called PrimarySurface, then another normal surface called Backbuffer. Then, instead of actually flipping surfaces, just use a blitting function to copy the data from backbuffer to primarysurface.

Still need help with this!