منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
إضافة متغير بإسم الفورم - نسخة قابلة للطباعة

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

الصفحات: 1 2 3


إضافة متغير بإسم الفورم - بيسك لكل العرب - 03-06-18

السلام عليكم ورحمة الله

لدي إستفسار علي عمل متغير بأسم الفورم 

متلا بهذه الطريقة 

 
كود :
"Dim Formname As String = "SearchForm
 Formname.Dgv1.DataSource = dt


وشكرا


RE: إضافة متغير بإسم الفورم - mrnooo2000 - 03-06-18

هذا الكود يعطيك ما تريد

كود :
Public Sub showFormDynamically(frmForm As String)
Dim obj As Object =
Activator.CreateInstance(Type.GetType("MYASSEMBLYNAME." +
frmForm))
obj.ShowDialog()
End Sub

و لاستدعاءه 
كود :
Dim vForm As String
vForm = "frmFormToOpen"
AppUtilities.showFormDynamically(vForm)



RE: إضافة متغير بإسم الفورم - ربيع - 03-06-18

وعليكم السلام ورحمة الله
عندي فضول اعرف سبب استخدامك لهاي الطريقة


RE: إضافة متغير بإسم الفورم - بيسك لكل العرب - 06-06-18

(03-06-18, 09:46 PM)ربيع كتب : وعليكم السلام ورحمة الله
عندي فضول اعرف سبب استخدامك لهاي الطريقة

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

(03-06-18, 06:56 PM)mrnooo2000 كتب : هذا الكود يعطيك ما تريد

كود :
Public Sub showFormDynamically(frmForm As String)
Dim obj As Object =
Activator.CreateInstance(Type.GetType("MYASSEMBLYNAME." +
frmForm))
obj.ShowDialog()
End Sub

و لاستدعاءه 
كود :
Dim vForm As String
vForm = "frmFormToOpen"
AppUtilities.showFormDynamically(vForm)
السلام عليكم اخي لم ينجح الكود 
مثال لدي 4 فورم واحد من الفورم احتاج عند اختيار اسم الفورم يقوم بإدخال البيانات في الفورم من خلال اسمه 
وشكرااا Smile


RE: إضافة متغير بإسم الفورم - عبدالله الدوسري - 07-06-18

(06-06-18, 06:11 PM)بيسك لكل العرب كتب :
(03-06-18, 09:46 PM)ربيع كتب : وعليكم السلام ورحمة الله
عندي فضول اعرف سبب استخدامك لهاي الطريقة

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



بيسك لكل العرب : بالله كم فورم عندك بالمشروع؟


RE: إضافة متغير بإسم الفورم - بيسك لكل العرب - 07-06-18

السلام عليكم لدي حوال 15 فورم بنفس الصورة الاختلاف فقط في الاقسام وعندي فورم اضافة وبحث واريد استخدامه مع كل الفورم الموجودة عن طريق متغير حتي لا اقوم بتكرار الكود او عمل اكتر من فورم اضافة وبحث 
ومشكلة الكود ان متغير لا يكون String وقمت بأكثر من طريقة ولكن لم تنجح

كود :
"Dim Formname As String = "SearchForm
Formname.Dgv1.DataSource = dt

[b]وشكرا أخي عبد الله[/b]


RE: إضافة متغير بإسم الفورم - elgokr - 07-06-18

للاسف انا لا افهم ما تريده بعد حتى بعد مراجعة وقراءة كل الردود اكثر من مرة
ما هى البيانات المطلوب نسخها او نقلها فى باقي الفورم
وما الذى تريده فعله بضبط
مثلاً لديك form1 ويحتوى على بيانات اى بيانات هنا المقصود
لنسخها او تكرارها فى form2 وغيره

كلما وضحت وبسط ما تريده كلما وجت الكود المطلوب

تحياتى لك



RE: إضافة متغير بإسم الفورم - بيسك لكل العرب - 07-06-18

(07-06-18, 04:09 PM)elgokr كتب :
للاسف انا لا افهم ما تريده بعد حتى بعد مراجعة وقراءة كل الردود اكثر من مرة
ما هى البيانات المطلوب نسخها او نقلها فى باقي الفورم
وما الذى تريده فعله بضبط
مثلاً لديك form1 ويحتوى على بيانات اى بيانات هنا المقصود
لنسخها او تكرارها فى form2 وغيره

كلما وضحت وبسط ما تريده كلما وجت الكود المطلوب

تحياتى لك

اخي المطلوب كالاتي

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


RE: إضافة متغير بإسم الفورم - mrnooo2000 - 07-06-18

ضع مثال لمشروعك 
ليتم التطبيق عليه حتى لا نضيع الوقت بلا جدوى


RE: إضافة متغير بإسم الفورم - elgokr - 07-06-18

(07-06-18, 05:12 PM)بيسك لكل العرب كتب :
(07-06-18, 04:09 PM)elgokr كتب :
للاسف انا لا افهم ما تريده بعد حتى بعد مراجعة وقراءة كل الردود اكثر من مرة
ما هى البيانات المطلوب نسخها او نقلها فى باقي الفورم
وما الذى تريده فعله بضبط
مثلاً لديك form1 ويحتوى على بيانات اى بيانات هنا المقصود
لنسخها او تكرارها فى form2 وغيره

كلما وضحت وبسط ما تريده كلما وجت الكود المطلوب

تحياتى لك

اخي المطلوب كالاتي

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


اذا كان الامر كما انت تقول ارسال قيمة استعلام الى فورم اخر

كل ما عليك فعله هو التالى
لنقول ان Form1 يحتوى على Textbox1
وتريد ارسال قيمته الى Textbox1 الموجود بـ Form2

فكل ما عليك هو عمل التالى
كود :
Form2.textbox1.text = Textbox1.text

مع العلم يجب ان يكون Form2 يعمل وليس مغلق

ولفتح الفورم وتنفيذ الكود به اجعل الكود كالتالى
كود :
Form2.Show()
       Form2.TextBox1.Text = TextBox1.Text

بمعنى انت قمت بعمل كود الاستعلام واصبح قيمة الاستعلام فى dt
كل ما عليك فعله هو 
كود :
       Form2.Show()
       Form2.DataGridView1.DataSource = dt

او
كود :
       Form2.Show()
       Form2.TextBox1.Text = dt.Rows(0)(0).ToString()

اتمنى يكون هذا ما تريده واكون بسط الامر لك

كما يمكنك عمل Class مخصص لامور الاستعلام والاضافة والتعديل والحذف
وكل ما عليك هو استدعاء الكلاس فى الفورم المطلوب حسب رغبتك

ليصبح الشكل فى الفورم بهذا الشكل
كود :
dt = Class_.Get_Filter_Data()


تحياتى لك
وتمنياتى لك التوفيق