[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

تسلم أخي الكريم " طالب برمجة " على المساعدة الطيّبة و على الملاحظات و النّصائح القيّمة

بارك الله فيك و لك و جزاك خير الجزاء و زادك من علمه و فضله إن شاء الله

1 - بالنسبة لجدول واحد .. أنا تعمّدت على جعل جدول واحد للدرجات مع الأسماء لأنّ الفكرة فقط حساب المعدلات أمّا البيانات الشّخصيّة سأخصّص لها جدول آخر حتى لا تختلط عليَّ الأمور لأنّ الرّبط بين الجداول لا أتقنه تمامًا و ليست لي الخبرة الكافية لإنجاز ذلك.

2 - العمود الأوّل النصّي نعم كان فيه سهو منّي لأنّ الحقل الأوّل هو بالأصل رقمي و جعلته كمفتاح رئيسي

3 - كل الحقول نصّية .. لأنّ عملّيات الجمع و الحسابات كلّها تتم داخل الفورم و أقوم بتصديرها إلى قاعدة البيانات و جعلتها نصّية لكي تبقى العلامات على حالها مثلاً كتبت .. 08.70 .. عند التّصدير أجدها 08.70 .. لو جعلتها رقمية ستكون بهذا الشّكل 8.7

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

هذا الكود الذي أستعمله يعمل بشكل جيّد لكنّه طويل و سبّب لي إرتباك ..

في الفيجوال 6 كنت أستعمل  هذا الكود ليفي بالغرض ..

كود :

Private Sub Text1_Change()
Text3.Text = Val(Replace(Me.Text1, ",", ".")) + Val(Replace(Me.Text2, ",", "."))
Text3.Text = Format(Text3.Text, "# #00.00 ")
End Sub

هل بالإمكان إيجاد كود بديل لهذا .. فيما يتعلّق بالجزئية العشرية الخاصّة بجعل رقمين بعد الفاصلة

وضعت أخي الكريم الكود المخصّص للتسلسل الرقمي .. يعمل بشكل جيّد في ترتيب السجلاّت على الداتا جريد لكن بقاعدة البيانات البيانات يبقى التسلسل غير المرتّب مثلما كان عليه .. ربّما قد أكون فهمت خطأ في كيفيّة إستعمال هذا الكود

كل الشكر و التّقدير أخي الكريم

إحتراماتي