[VB.NET] Transparencia en formulario

------------------------------------------------------------------

Descarga el ejemplo: http://www.mediafire.com/?g3h8tbzwd44dlqj
¿Flag?: http://es.wikipedia.org/wiki/Flag

------------------------------------------------------------------


Un poco de Explicación (nadie nace sabiendo ¬.¬)
Primero declaro la variable Flag (bandera en español) del tipo de dato Boolean(el valor por default de un tipo de dato Boolean es "False"). Empezamos por el control timer, en el cual va a tener un intervalo de "1" y programaremos en el evento "Tick":

el código es sencillo simplemente por cada ciclo le disminuirá la opacidad al formulario en 0.01, cuando llega a opacidad 0 se cierra el formulario

ahora en el formulario en el evento "FormClosing":

ahora como nuestro proyecto por defecto el control timer esta inactivo, cuando le demos click al botón cerrar del formulario llamara al evento FormClosing el cual tiene una condicion si Flag es False, entonces detiene el evento cambia el estado de Flag a True y activa el control timer, ahora empieza a trabajar el evento Tick del control timer cuando la opacidad llega a "0", simplemente vuelve a llamar al evento FormClosing, ahora como Flag tiene el valor True simplemente pasa a la línea "e.Cancel = False" y se cierra el formulario.

Código Fuente: