اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اعادة الترقيم التلقائي


kkhalifa1960

الردود الموصى بها

لدي مشروع  به فورم باسم النموذج "frmAutoNumber"
ما أريد أن أفعله هو هذا ؛ أرغب في اختيار اسم الجدول من CompoBox1 والمعرف من TextBox1 لنقله إلى محرر Visual Basic. 
وذلك بدلاً من كتابة البرمجة لكل جدول على حدى
هل لدى أي شخص طريقة للقيام بذلك أو يقدم اقتراحات؟

شكرا للنظر في سؤالي !!
مرفق المشروع وهو من تصميم الأخت زهرة العبدالله الله يعطيها الصحة والعافية

Mahdi.rar

رابط هذا التعليق
شارك

بارك الله فيك أخي الكريم

ولكن .. ألا يمكن أن يعمل الكود على كل الاحتمالات: مفتاح أساسي // بدون مفتاح ولا فهرسة // بدون مفتاح لكن مع فهرسة

 

بدل أن نستخدم كوداً خاصاً لكل حالة

رابط هذا التعليق
شارك

ورحم الله والديك وجميع المسلمين في ليلة الجمعة المباركة هذه

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

باستخدام IF  أو أي دالة أخرى للاحتمالات

دون الحاجة لتغيير الخصائص لتوافق الكود ، بل دون النظر أصلاً لخصائص الحقل ، حيث أن الكود سيعمل المطلوب على جميع الاحتمالات

رابط هذا التعليق
شارك

هل هذا يعني أن الأمر غير ممكن برمجياً

 

أعيد صياغة الطلب لزيادة التوضيح

هناك عدة أكواد لإعادة الترقيم التلقائي

بعضها مثل الكود الجميل الموجود هنا يصلح في حالة كونه مفتاحاً أساسياً

 

وعند عدم كونه مفتاحاً أساسياً .. هنا احتمالان:

- ألا يكون مفهرساً

- أن يكون مفهرساً ، وهنا احتمالان فرعيان: بتكرار وبدون تكرار

 

وتوجد أكواد لهذه الحالات

 

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

بدل أن يضطر المستخدم للرجوع أولا لخصائص الترقيم في الجدول ويختار بناء عليها الكود المناسب لحالته ..

 

هل هذا ممكن برمجياً .. أم علينا الاختيار بأنفسنا بين الأكواد المتعددة

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information