لا يوجد في الآكسس تحويل تلقائل ولحل هذة المشكلة تستطيع ان نتبع الطريقة التالية
وهي تعتمد علي المطابقة من خلال بحث داخل متوالية من الأرقام
وتجربة قسمة رقم علي رقم حتي يتم المطابقة بين الكسر العشري ونتيجة هذة القسمة
مثال :
Public Function frag(ByVal value As String) As String
Dim i, s As Integer
Dim D As Double = Math.Round(Val(value), 5)
For i = 1 To 9999 '''''المقام
For s = 0 To 9999 '''''' البسط
If D = Math.Round(s / i, 5) Then
frag = s & "/" & i
Return frag
Exit Function
End If
Next
Next
Return frag
End Function
وشكراً
والسلام عليكم ورحمة الله وبركاته - اخوك في الله علوش
وعليكم السلام
لقد استخدمت اللغة العربية في اسماء الحقول
وهذا ما يجعل البرنامج بطيء
انا عدلت التاريخ ليكون تلقائي
كذلك جعلت النموذج يكون منبثق كما طلبت في الفقرة الخامسة
في الصورة مكتوب :
-----------------------------
الاجراء المتخذ اريد ان يكون به زر اختيار للتنقل
بين العقوبات وكذلك في مسمى الوظيفة وجهة العمل
هل للموظف اكثر من مسمى وظيفة حتى تختار منها
هل للموظف اكثر من جهة عمل حتى تختار منها
ارجو سرعة الرد لأني بدأت في تصميم البرنامج
هاهاها
لا مش زعلانين ولا حاجة
بالنسبة للسؤال ممكن
طبعا ضع زر على النموذج وضع فيه كود الحفظ
في حدث النموذج عند الاغلاق ضع كود التراجع
الامر بسيط
كود التراجع هو
DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
ألقي نظرة على الملف وقل لي اين العيب او ماذا ينقص
وهذه الخطوة الاولى في النقطة الاولى ..!
هل هناك عيب في تسجيل معدة هل هناك مكررات يجب تلافيها مثل ( نوع المعدة )
السلام عليكم ورحمة الله
المشكلة يا خي في غاية المشروع الهدف من المشروع
مما لا شك فيه أنك لا تعرف عمل الآكسس ولو كنت تعرف عمل الأكسس لبسط عليك شرح الهدف
بعد الاطلاع على الملف ا لمرفق لا حضت حشو متكرر في الجدول ولا اعلم ما الفائدة منه
وسوف اتعاون معك في هذا الشيء ..
الشيء اللي فهمته من البرنامج
انك تستورد معدات زراعية ذات انواع متعددة من جهات مختلفة
نقف عند هذه النقطة فقط ونصمم البرنامج على هذا الاساس و ننظر في كل احتياجاتنا في الاستيراد
الآن مطلوب منك ان تشرح الطريقة التي تستورد بها
من وكالاة عالمية وبلاد اجنبية ما هي البيانات التي سوف تسجلها وهي كما قلنا النقطة الاولى
مثلا - النرويج - وكالة براتون - الهاتف - العنوان - نوع المعدة - كذا - كذا - كذا
هل البلد مهم ويسجل في قاعدة البيانات هل التلفون مهم وهكذا
انا سوف اصمم البرنامج وأنت تنظر للبرنامج وتنتقد العيوب وتطلب الاضافات وهكذا
----------------
بسم الله نبدأ
المطلوب أن يتم تعبئة الحقل good في الجدول الثالث برمجياً حسب البيانات المدخلة في الجدول الأول والثاني
على ضوء ما يلي :
في الجدول الثاني رقم الطالب -رقم المادة - رقم المهارة- التقويم ...
فإذا أخذ الطالب في جميع مهارات المادة 1 يتم تحديث الحقل good في الجدول الثالث إلى 1 حسب
رقم الطالب ورقم المادة في الجدول الثاني
المادة 1 من اي جدول
لاحظ أن الجدول الثاني و الثالث يحتوي على رقم الطالب
لاحظ أن الجدول الثاني و الثالث يحتوي على رقم المادة
كلمني على الايميل
allosh1@hotmail.com
حاولت افهم الفكرة و مازلت احاول افهم
انا اقترح عليك أن تسأل عن نقطة وحدة و بعدين الباقي وش رأيك
وبعدين ليش معقدها كذا
جدول يحوي أرقام الطلاب واسمائهم وجدول يحوي المواد وجدول يحوي التقييم و دحدر
نزلن الملف ولم اجد فيه مشكلة
إذا كنت تقصد التركيز يكون في النموذج الفرعي في خانة معينة يعني في خانة لون السيارة
اضف هذا الكود عند التحميل ( النموذج الفرعي )
Private Sub Form_Load()
Me![VehicleColor].SetFocus
End Sub
اولا : شكرا جزيلا على الرد
ثانيا : كما هو معلوم ان القائمة المنسدلة تعتمد على جدول أضف للجدول سجل واكتب الخيار الرابع ولاحظ النتيجة
النتيجة فتاكة ..
واشكرك على الرد والمشاركة
السلام عليكم ورحمة الله ..
السؤال :
كيف اسند قيمة مختارة من قائمة منسدلة الى مربع نص
قد يتبادر لذهنك ان السؤال بسيط لكن نزل المثال وشوف
السؤال داخل المثال
والشكر الجزيل والأجر العظيم لمن ساعدني على ايجاد الحل