Ihr benötigt :
1 x Modul
Code für das Modul :
Code für die Form :
Ok damit wäre es erstmal geschaft Wenn ihr Verbesserungs Vorschläge habt bitte unten posten ...
1 x Modul
Code für das Modul :
VB.NET-Quellcode
- Module Ein_Ausblenden
- Public Sub Einblenden(ByVal f As Form)
- For Einblenden As Double = 0.0 To 1.1 Step 0.1
- f.Opacity = Einblenden
- f.Refresh()
- Threading.Thread.Sleep(50)
- Next
- End Sub
- Public Sub Ausblenden(ByVal f As Form)
- For Ausblenden As Double = 1.1 To 0.0 Step -0.1
- f.Opacity = Ausblenden
- f.Refresh()
- Threading.Thread.Sleep(50)
- Next
- End Sub
- End Module
Code für die Form :
VB.NET-Quellcode
- Public Class Form1
- Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
- Ausblenden(Me)
- End Sub
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Einblenden(Me)
- End Sub
- End Class
Ok damit wäre es erstmal geschaft Wenn ihr Verbesserungs Vorschläge habt bitte unten posten ...
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „mikeb69“ () aus folgendem Grund: Code korrigiert