26-08-16, 01:58 PM
السلام عليكم جميعا
اريد كود يعمل علي اغلاق الفورم vbبالتلاشي الشفافية
اشتغل معي الكود عند فتح الفورم لكن لم اعرف كيف اشغله عند الاغلاق
كود عند التشغيل :
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Me.Opacity = 0
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Me.Opacity = Me.Opacity + 0.03
If Me.Opacity > 97 Then
Timer1.Enabled = False
End If
End Sub
End Class
--------------------------------------------------------------------------------------
بارك الله فيكم وجزالكم الله الف خير
اريد كود يعمل علي اغلاق الفورم vbبالتلاشي الشفافية
اشتغل معي الكود عند فتح الفورم لكن لم اعرف كيف اشغله عند الاغلاق
كود عند التشغيل :
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Me.Opacity = 0
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Me.Opacity = Me.Opacity + 0.03
If Me.Opacity > 97 Then
Timer1.Enabled = False
End If
End Sub
End Class
--------------------------------------------------------------------------------------
بارك الله فيكم وجزالكم الله الف خير