22-05-16, 06:27 PM
(22-05-16, 05:54 PM)amgad525 كتب :PHP كود :
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim r = GetSetting(Application.ProductName, Me.Name, "FirstStart", False)
If r Then
Form2.ShowDialog()
Me.Close()
End If
SaveSetting(Application.ProductName, Me.Name, "FirstStart", True)
End Sub
End Class
شكرا لك أخي الكريم وبارك الله فيك
ولك كل الإحترام مني وعلى ردك السريع الرائع
