منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استدعاء معلومات جدولين عن طريق المفتاح الاجنبي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بسم الله الرحمن الرحيم 



رمضان كريم عليكم وعلى الامة العربية 

 

وحفظكم الله من كل مكروه 



*****************************************************************

انا كنت شغال على الاكسس وشغال بشكل احترافي والحمد لله 
لكن حبيت اطور من نفسي رحت شغال فيجول // وهنا بدات الصدمه لي  بسبب اختلاف بيئة العمل
عندي مشكل بصراحة وصلت لمرحلة الياس في حلها وكلي امل فيكم 

عندي جدولين 

الاول اسمه Info  خاص بمعلومات المرضى 

الجدول الثاني اسمه Reviews وفيه زيارات المرضى ونوع الزيارة وتاريخ الزيارة 
بينهم علاقة 
ID >>>>>IDD
لما اقوم باستدعاء بيانات المريض وكما في الصورة 
يوجد زر اسمه زيارة جديدة 
اثناء الضغط علية يخرج لي فورم اخر
لكن المشكلة يقوم بجلب زيارات وتواريخ جميع المرضى 
كما في الصوره 
المطلوب 
لما اقوم بتحديد مريض جديد والضغط على زر 
زيارة جديدة 
يفتح الفورم الثاني   
 ويعرض زيارات المريض المحدد  فقط 
والسلام عليكم 
ضع الكود لنراه
اعتقد المشكلة بجملة جلب البيانات يجب ان تحدد رقم المريض الذي تريد جلب بياناته للداتاجرد فيو
فانت تجلب جميع بيانات المرضى وليس المريض الذي تريد اضافة زيارة جديدة له
شكرا لاهتمامك بالموضوع
سبق وان قلت اني جديد على الفيجول
اي ان الكود الذي وضعته بالزر فقط اظهار الفورم
اما بحدث تحميل الفورم
وضعت تحميل معلومات الجدول الخاص بالزيارات

da = New OleDbDataAdapter(" select * from Reviews  ", con)
       da.Fill(dt)
في فورم الزيارات
وهذا في زر الاختيار  في الفورم الاول 
    If ID.Text = "" Or age.Text = "" Then
           MsgBox("يرجى اختيار المريض")
           Return
       Else
           Visits.Show()
       End If
ضع الكود الخاص بتحميل البيانات يجب ان تضع فيه شرط بدلالة رقم المريض
وان شاء الله بنساعدك

بالنسبة لتحميل البيانات يجب ان تكون بحدث الزر الخاص بفتح الشاشة
حلو يعني تحميل البيانات بيكول بزر فتح الفورم
طيب كيف بدي اكتب الشرط حسب ID
عندك برنامج anydesk
ثواني بيكون جاهز
كود :
(" select * from Reviews where id="& ID.Text &"", con)