- Yasaklandı
- #1
[font=Hind, sans-serif]Form a 2 kez tıklayın ve bu kodu yazın[/FONT]
[font=Hind, sans-serif]Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For Fadein = 0.0 To 1.1 Step 0.1 Me.Opacity = Fadein Me.Refresh() Threading.Thread.Sleep(100) Next End Sub[/FONT]
[font=Hind, sans-serif]Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For Fadein = 0.0 To 1.1 Step 0.1 Me.Opacity = Fadein Me.Refresh() Threading.Thread.Sleep(100) Next End Sub[/FONT]
