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

كود ساعدوني

مغلق
بدأه كنوززوزو في 15 مايو 2004 · 3 رد · 523 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اريد كود رقيم تلقائي لان في data base لا استطيع ان يكون حقلين ترقيم تلقائي ارجو المساعدة

#2

اخي الكريم ، ارجو تجربة الكود المرفق وارجو إعلامي في حالة وجود أي مشكلة

#3

اخي الكريم ، ارجو تجربة الكود المرفق وارجو إعلامي في حالة وجود أي مشكلة

جرب هذا الكود.txt

#4
قم بإنشاء جدول ومن ثم قم بإنشاء حقل رقم
وبعد ذلك قم بإنشاء نموذج واكتب هذا الكود في القيمة الإفتراضية لنفس الحقل


فلنفرض ان إسم الجدول هو Table
ولنفرض أيضا بأن إسم الحقل هو Field

=IIf(IsNumeric(DMax("Field";"Table")+1)=خطأ;1;DMax("Field";"Table")+1)

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

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