[TuToRiAl] Fading In & Fading Out Effects on Open+Close [TuToRiAl]

[AceInfinity]

As KoBE has said, you should have had it as:

Code:

'Form Close Effect
Private Sub Form1_Close(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    For FadingOutProcess = 0.9 To 0.1 Step -0.1
        Me.Opacity = FadingOutProcess
        Me.Refresh()
        Threading.Thread.Sleep(70)
    Next
End Sub