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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=42571)

كود استدعاء - حماده ممدوح البحيرى - 28-09-22

السلام عليكم لدى جدول فى قاعدة البيانات كما هو موضح

هناك ثلاث صفوف داخل الجدول العامل المشترك بينهما هو    رقم 3028 فى عمود prd_id





المطلوب 

لدى فورم ببه اكثر من تيكست بوكس

اريد عند كتابة 3028 داخل تيكست بوكس  يستدعى باقى النتائج بناء على هذا الشرط (3028)



كما هو موضح بالصورة



وشكرا لكم

RE: كود استدعاء - حماده ممدوح البحيرى - 28-09-22

السلام على اهل الكرم
ارجو الرد

RE: كود استدعاء - حماده ممدوح البحيرى - 29-09-22

??????????????????????????????????????????????????
هو المنتدى كله بيصيف ولا اييييييييه Smile

RE: كود استدعاء - رضوان الجماعي - 29-09-22

يمكن بيصيف المهم ما فهمت ايش طلبك تريد الكود يستدعي prd_id المشترك بين الطلابات كا كود بحث او ايش

RE: كود استدعاء - حماده ممدوح البحيرى - 30-09-22

اهلا بيك يا استاذنا Smile
المطلوب اخى داخل صورة الفورم
هو انى لما اكتب مثلا كود 3028 او اى كود اخر مُسجل عندى

يعطينى جميع الاصناف التى تخص هذا الكود بكمياتهم المقابلة لكل صنف

وكما ذكرت ما اريده موضح بالفورم

RE: كود استدعاء - رضوان الجماعي - 30-09-22

اخي الحبيب المسئله بسيطه اوي اوي اعمل select كا التالي مثلا
rivate Sub Fillservis()

con.Open()
Dim cmd As New SqlCommand("SELECT * FROM [Service] ", con)

Dim rdr As SqlDataReader = cmd.ExecuteReader
While rdr.Read()
ListBoxnamper.Items.Add(rdr(0))
Checke_servis.Items.Add(rdr(1))
ListBoxmony.Items.Add(rdr(2))

End While

con.Close()

End Sub
عشان تعرف قاعدت البيانات على الادوات وبعدها اعمل اعمل select Search في التكست بكس الي بدخله الكود علاشان يجبلك المطلوب اتمنى تكون وضحتلك الفكرة
اذا ما وضحت الفكره ارفع البرنامج ليتم التعديل عليه