[عبد العزيز البسكري]

السلام عليكم و رحمة الله و بركاته

محاولة ليست جادة .. بعد منتصف الليل .. يمكن تجد الأفضل

كود :

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       If My.Settings.FirstOpening = True Then
           My.Settings.FirstOpening = False
           My.Settings.Save()
       ElseIf My.Settings.FirstOpening = False Then
           Form2.ShowDialog()
           Me.Dispose()
       End If
   End Sub
End Class