ابوحمود

ماذا تقصد بالسجلات ؟

انقر هنا قمت بتحديث المثال فقط الآن انسخ الى نموذجك أزرار الحروف ومجموعة الخيار والكود في الوحدة النمطية في نموذج1 ولاتنسى اختيار [إجراء حدث] في حدث بعد التحديث لمجموعة ازرار الحروف . وطريقة الكود فقط مرر اسم الجدول واسم الحقل كما ستشاهد في المثال .

أنسخ الكود التالي وضعه في حدث بعد التحديث لقائمة التصنيف : If Me!التصنيف.Column(1) = "معادة" Then Exit Sub Dim الموظف_الأخير_للتصنيف_الحالي As Variant الموظف_الأخير_للتصنيف_الحالي = DLast("الجهة", "التسجيل", "التصنيف=" & Me![التصنيف] & " And التصنيف<> " & DFir…

في حدث عند الحالي للنموذج ضع : Static LastDetailBackColor As Long If LastDetailBackColor = 0 Or LastDetailBackColor <> 32768 Then Me.Section(0).BackColor = 32768 LastDetailBackColor = 32768 Else Me.Section(0).BackColor = 16777215 LastDetailBackColor = 16777215…

.

في شبكة الاستعلام في حقل أكتب هذا السطر Expr1: IIf([المهنة]="كهربائي";1;IIf([المهنة]="سائق";2;3)) وتحته اختر فرز تصاعدي

أخي الفاروق عذرا فلم أفهم من كلامك أي شيء ارجو أن توضخ لي هذا : ولكن كيف يتم ضبط حقل معين فى الجدول كى ينفذ هذه الطريقة على أحد الحقول الأخرى التى ستتمثل فى نص3 بطريقة تلقائية فور إدخال البيانات مباشرة ؟ ولك تحياتي

الأخ vb_access2002 سبق في موضوع أن وضعت مثال عن دالة IIF ودالة CINT للتحويل لعدد صحيح والفرق بين cint وint أن الأولى تعطي العدد الصحيح مع التقريب والثانية بدون تقريب مثال : CInt(78.88)=79 Int(78.88)=78 أما اذا كان العدد سالبا فتقرب مثل Int(-78.88)=-79

الظاهر سبق الكلام عن هذه الدالة في المنتدى ابحث وإن شاء الله بتلاقي اللي تريده

في معيار تحت الحقل المطلوب في الاستعلام اكتب [ادخل المعيار]

اين تحذف الملفات كل فترة

السؤال غير واضح تماما لكن هل جربت الجمع العادي مثل شهر1+شهر2 ....

قد يفيدك هذا الرابط

1- افتح الجدول في عرض التصميم 2- انقر قائمة عرض=>فهارس 3- تحت اسم الفهرس اكتب مثلا منع التكرار وبجانبها اختر حقل رقم الوارد وفي الأسفل اختر فريد نعم 4- تحت رقم الوارد التي اخترتها اختر حقل التاريخ 5- ثم أغلقه واحفظ الجدول الآن جرب كتابة رقم وتاريخ ثم أعد تسجيل…

ضع مثال يحتوي على الجدول والتقريرين مع بعض البيانات وأنا أكمل الباقي إن شاء الله

لم توضح معيار لأي شي ؟

كان من الأفضل من البداية أن تذكر أسماء مربعات النص . هذا المثال : http://www.msaccess4arab.com/temp/AddDate.zip ولك تحياتي

هل هذا الطلب تابع لهذا الموضوع : http://arabteam2000.com/vb/showthread.php?...?threadid=14735

في حدث عند الخروج من مربع النص المده في الوحدة النمطية اكتب [تاريخ النهايه] = DateAdd("d", المده, [تاريخ البدايه]) وإذا كان مربع النص تاريخ النهايه غير منضم فضع الكود في مصدر عنصر التحكم بهذا الشكل : =DateAdd("d";[المده];[تاريخ البدايه])

أنشئ فهرس بحقلي التاريخ وحقل رقم الوارد ولن يتكرر رقم في نفس السنة