السلام عليكم
لدي متغير نصي يحمل اسم الفورم علي سبيل المثال form2
اريد عمل for يغلق جميع الفورمات المفتوحه ما عدا الفورم اللي في المتغير النصي كيف يتم ذلك
(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
بامكانك تجرب هذا الكود