+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [vb6.0] كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ (/showthread.php?tid=18792)
كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ - Microformt - 13-01-17
بسم الله الرحمن الرحيم
الاخوه الكرام
السلام عليكم ورحمة وبركاته
كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟
نامل من الله المساعده والله يحفظكم ويرعاكم
RE: كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ - sendbad100 - 14-01-17
وعليكم السلام ورحمة الله وبركات
للبحث بالاسم كاملا
كود :
Set rs = db.OpenRecordset("select * From sot Where codiD='" & Trim(Text2.Text) & "'")للبحث بجزء من الاسم سوى كان الاول او الاوسط او الاخير كود واحد
كود :
Set rs = db.OpenRecordset(" select * From sot Where [Name] Like '*" & Text2.Text & "*'")الافضل تستخدم الاداة OptionButton بدلا من CheckBox
ايضا ستحتاج الى جدول كي تعرض فيه نتائج البحث جزء من الاسم فقد يظهر لك اكثر من نتيجة في البحث
والله الموفق
RE: كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ - Microformt - 14-01-17
(14-01-17, 08:26 AM)sendbad100 كتب : وعليكم السلام ورحمة الله وبركاتاخي العزيز
للبحث بالاسم كاملا
كود :
Set rs = db.OpenRecordset("select * From sot Where codiD='" & Trim(Text2.Text) & "'")
للبحث بجزء من الاسم سوى كان الاول او الاوسط او الاخير كود واحد
كود :
Set rs = db.OpenRecordset(" select * From sot Where [Name] Like '*" & Text2.Text & "*'")
الافضل تستخدم الاداة OptionButton بدلا من CheckBox
ايضا ستحتاج الى جدول كي تعرض فيه نتائج البحث جزء من الاسم فقد يظهر لك اكثر من نتيجة في البحث
والله الموفق
السلام عليكم ورحمة وبركاته
لكم مني جزيل الشكر والتقدير
تحياتي