الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عمل زر بحث

بدأه KNOK في 2 يوليو 2013 · 3 رد · 618 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

لم استطع عملها 

وعندي مربع نص لدرجات الطالبات عند إدخال الدرجه تظهر في مربع اخر التقدير المناسب ، سأحتاج لشروط if ولكن او مره اتعامل مع الاكسس ولا ادري من اين اقوم بكتابتها 

وجوزيتم خيرا

#2

اخي الفاضل

 

يفضل رفع قاعدة البيانات وشرح المطلوب الذي تريده حتى نستطيع مساعدتك بأسرع وقت ممكن

 

 

بالتوفيق

#3

سأحاول تقريب المشهد بالقدر المتاح

لنفترض ان لديك جدول بعنوان Students يتضمن الحقول التالية:

الحقل الأول : ID

الحقل الثاني : StudentName

الحقل الثالث : Grade

في النموذج StudentF قم بإنشاء مربع نص بعنوان txtSearch وأمر بعنوان cmdsearch ثم إضغط على الأمر في إطار التصميم وضع الكود البرمجي التالي عند حالة الضغط على الأمر cmdSearch وهو:

()Private sub cmdSearch_click

(If isnull (me.txtSearch.value

Then

Me.filteron = false

Else

Me.filter ="StudentName = " " " & Me.txtSearch.value & " " " "

#4
Khodor1985 كتب:

سأحاول تقريب المشهد بالقدر المتاح

لنفترض ان لديك جدول بعنوان Students يتضمن الحقول التالية:

الحقل الأول : ID

الحقل الثاني : StudentName

الحقل الثالث : Grade

في النموذج StudentF قم بإنشاء مربع نص بعنوان txtSearch وأمر بعنوان cmdsearch ثم إضغط على الأمر في إطار التصميم وضع الكود البرمجي التالي عند حالة الضغط على الأمر cmdSearch وهو:

()Private sub cmdSearch_click

(If isnull (me.txtSearch.value

Then

Me.filteron = false

Else

Me.filter ="StudentName = " " " & Me.txtSearch.value & " " " "

End if

مواضيع مشابهة