منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
معلومة ::: Open Form As Single - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : معلومة ::: Open Form As Single (/showthread.php?tid=5291)



معلومة ::: Open Form As Single - RaggiTech - 06-10-12

كاتب الموضوع : BADRMEDIA



ربما تريد ألا يفتح المستخدم الفورم أكثر من مرة وتكون نسخة واحدة فقط الموجودة

للقيام بذلك


نعلن عن الفورم فى القسم العام للمتغيرات تحت الكلاس للفورم



كود :
Private MyForm As MyForm


وعند ارسال أمر فتح الفورم نكتب



كود :
If IsNothing(MyForm ) = False Then
If MyForm .IsDisposed = False Then
Else
MyForm = New MyForm
MyForm .MdiParent = Me


MyForm .Show()

End If
Else
MyForm = New MyForm
MyForm .MdiParent = Me

MyForm .Show()

End If

الكود واضح إن شاء الله