منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ممكن سؤال في ال for
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم 

لدي متغير نصي يحمل اسم الفورم علي سبيل المثال form2

اريد عمل for يغلق جميع الفورمات المفتوحه ما عدا الفورم اللي في المتغير النصي كيف يتم ذلك
كود :
Dim St As String = "Form2"
       For i As Integer = Application.OpenForms.Count - 1 To 1 Step -1
           If Not Application.OpenForms(i).Text = St Then ' Text او Name
               Application.OpenForms(i).Close()
           End If
       Next
(21-03-21, 02:52 AM)3booody كتب : [ -> ]
كود :
Dim St As String = "Form2"
       For i As Integer = Application.OpenForms.Count - 1 To 1 Step -1
           If Not Application.OpenForms(i).Text = St Then ' Text او Name
               Application.OpenForms(i).Close()
           End If
       Next

طول عمرك واقف بجانبنا يا كبير
"Dim St As String = "Form
       For i As Integer = Application.OpenForms.Count - 1 To 1 Step -1
           If Not Application.OpenForms(i).Text = St Then ' Text
or name
               ()Application.OpenForms(i).Close
           End If
       Next



بامكانك تجرب هذا الكود