مساعدة في بناء كود للبحث

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

هذا هو كل ماتحتاج اليه اخى الكريم

تم فرض ان هناك نموذج به مربع نص textbox

يسمى text1

وبه قائمة تسمى list1

وان هناك جدول به حقل للاسم يسمى name

set exact off
locate for upper(alltrim(name)) = upper(alltrim(thisform.text1.text))
do while found()
thisform.list1.additem(alltrim(name))
continue
enddo

مع تحياتى للجميع

والله الموفق

السلام عليكم يا اعزائي ومبارك عليكم الشهر الفضيل .. ولكم وحشة

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

حتى لا اطيل عليكم خذ هذا البرنامج البسيط .

يرجى العلم بانه هنا اكثر من 8500 اسم في الجدول المرفق وكلها اسماء لاشخاص حقيقية .

البرنامج في المرفقات مع السورس.

تحياتي لكم

كود البحث والقصة كلها تكمن في التالي

namess.rar