تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال بخصوص فتح الشاشات
#1
السلام عليكم ورحمة الله وبركاته 

أخواني الأعزاء ....

كيف أضع الكود التالي في موديول : 


كود :
       Dim frm As FrmManage_CountriesAndCities = New FrmManage_CountriesAndCities()
       frm.ShowDialog()


حاولت أكتبه في موديل كالتالي : 



كود :
   Public Sub OpenForm(ByVal Frm As Form)
       Frm = New Frm()
       frm.ShowDialog()
   End Sub


ولكن يظهر خطأ وهو : 

" Type 'Frm' is not defined "


وشكرا .... 
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله


قم بانشاء هذا الكود
كود :
   Public Function OpenForm(Frm As Form) As Form
       Frm.ShowDialog()
       Return Frm
   End Function

وعند الاستخدام
كود :
       OpenForm(New Form2)


تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
#3
أشكرك جزيل الشكر أخي الكريم
الرد }}}
تم الشكر بواسطة: elgokr
#4
الشكر لله والحمد لله
والحمد لله على كل حال

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: حريف برمجة , حريف برمجة , dell



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم