بسم الله والصلاة والسلام على رسول الله
الشكرلله . الحقيقة الرابط لا يفتح معى لكن ممكن تضغط الملف عن طريق برنامج WinRaR
حضرتك ممكن تعمل نموذج Form ، وتسميه الشاشة الافتتاحية ، سوف تقوم بعمله من تبويب إنشاء ثم Form Design ، وتدرج عليه زرين Button 2 أو 3
- زر تسميه -- بحث عن طريق اسم القسم -- يُدخل المستخدم على استعلام ذو وسائط (يقول للمستخدم ادخل اسم القسم ) عندما يكتب المستخدم اسم القسم ويضغط موافق تظهر له النتائج والتى من الممكن ان تكون مجمعة من أكثر من جدول وتكون العلاقات relations بين تلك الجداول سليمة .
ونفس الطريقة مع زر -- بحث عن طريق الرقم التسلسلى --
و زر تسميه -- مشاريع -- يُدخل المستخدم على نموذج مشاريع عند الضغط عليه . وفى كل نمودج منهم (المشاريع) نضع زر يذهب بالمستخدم للنموذج الذى بعده
كيفية إدراج زر على ال Form وكتابة أمر له :
- إنذهب للنموذج فى وضع التصميم Design View
- ندرج الزر ثم نقوم بتحريره من Click يمين ثم layout ثم remove layout
- نحدد الزر ثم من الخصائص Data sheet : أمام عند النقر on click
نضغط على السهم الأسود الصغير ونختار Event Procedurer ثم Click يمين ثم Build تفتح نافذة كتابة الكود
كتابة أمر فتح الاستعلام : طريقة العرض , "اسم الاستعلام " Docmd.OpenQuery
كتابة أمر فتح النموذج : طريقة العرض , "اسم النموذج" Docmd.OpenForm
مثال :
()Private Sub Employees_Click
acNormal , "بيانات الموظفين" Docmd.OpenForm
End Sub
كود الزر إغلاق إذا أردته DoCmd.Quit