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

إدراج رقم تلقائي عن طريق الكود

مغلق
بدأه الغامدي في 23 ديسمبر 2001 · 1 رد · 371 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخواني هل يوج هنا طريقة عن طريق الكود بحيث أستخدمت زر جديد يقوم البرنامج بإدراج رقم تسلسلي بخلاف خاصية الترقيم التلقائي المعرصائص الحقل والله يرعاكم

#2

الأخ الغامدي

استخدم الكود التالي مع تغيير ما يلزم :

If DCount("[اسم الحقل الذي تضع فيه الرقم في الجدول]", "اسم الجدول") = 0 Then
[اسم الحقل الذي تضع فيه الرقم] = 1
Else
[اسم الحقل الذي تضع فيه الرقم] = DLast("[اسم الحقل السابق في الجدول]", "اسم الجدول") + 1
End If

ضعه في حدث عند نقر زر الأمر .

ولك تحياتي

هذا الموضوع مغلق.

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