18-08-18, 05:49 PM
بما انك بتستخدم كود فلتر الداتا خريد
فكل ما عليك فعله هو التالى
استخدم كود الساب بهذا الشكل
كود :
Sub getm(ByVal cmb As Control)
Dim dv As New DataView
dv = DirectCast(DataGridView1.DataSource, DataTable).DefaultView
dv.RowFilter = "MN_NAME = '" + cmb.Text + "'"
DataGridView1.DataSource = dv
End Subوتعال فى حدث الكمبو واستخدم الكود بهذا الشكل
كود :
getm(CMB_MANDOB)وباذن الله سيعمل معاك فى كل مرة تقوم بتحديد من الكمبو بدون مشكلة
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

