[bakriano30@yahoo.com]

(30-07-19, 12:58 PM)mohamedahmed1 كتب : احذف جميع الاكواد الموجودة في الكلاس
وضع الكود

دا

Namespace My
  Partial Friend Class MyApplication

      Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As

Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
          My.Settings.nb += 1
          My.Settings.Save()
      End Sub
  End Class
End Namespace

الله يوفقك يا محمد تم يا كبير ولكن هل من الممكن استثني ليبل معين مايتعملش ليه فولس