Establecer como Fondo de Escritorio con VB 2005

[cobossagrav]

Colega, este código resulta la primera vez pero de ahí se quita el fondo de pantalla.
Es decir, lo probé la primera vez, y todo corría excelentemente…
Pero al cerrar la aplicación mi escritorio pierde la imagen q le puse como fondo de pantalla y al volver a usar el programa, pues ya no corre ya no se da nada,
Por q es eso me puedes decir.