ابوخليل

If IsNull(Me.date_from) Or IsNull(Me.date_to) Then Exit Sub Me.da.SetFocus Me.da.Text = CalcAgeD(Me.date_from, Me.date_to) Me.mo.SetFocus Me.mo.Text = CalcAgeM(Me.date_from, Me.date_to) Me.ye.SetFocus Me.ye.Text = CalcAgeY(Me.date_from, Me.date_to) هذه الاسطر الموجودة في النموذج والخاصة باستخراج العمر (الفارق بين تاريخين ) ضعها في حدث الحالي للنموذج فحدث الحالي يقوم بالتغيير عند التنقل بين السجلات

الامر يسير ويجب انك تحاول حتى تستفيد فقط انسخ كود المربع الاول للمربع الثاني وغير ما يلزم Prog.1003.rar

تفضل وآمل ان يكون هو بغيتك Private Sub Text0_Click() Text0 = Text0.Name End Sub db2016x.rar

لا يمكنني فتح المرفق .. لا املك في جهازي الا الاصدار2003

تفضل طريقة ارى انها افضل من الكتابة فقط حيث يمكنك الاختيار او الكتابة للبحث عن المفردة Prog.1002.rar

احفظ المرفق على صيغة mdb

وهذا مثال آخر Private Sub co1_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[id] = " & Str(Nz(Me![co1], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark End Sub مربع تحرير.rar

جرب الاصدار 10 وما فوق

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

الدرجة ستكون لمخرج واحد لكل الطلاب والمخرج سيتم اختياره من مربع تحرير في النموذج الرئيسي بعنى سيتم رصد درجة مخرج واحد في كل مرة يتم الحفظ وهكذا الى استيفاء جميع مخرجات المادة ملاحظة : هذه المخرجات اكيد انها مخصصة فلكل فترة مخرجات محددة للمادة .. هل هذا صحيح ؟

If Nz(DLookup("id", "[tbl]", "[c]&[f]&[k]&[d]='" & c & f & k & d & "'"), 0) <> id Then Cancel = MsgBox("مكرر")

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

هذا رابط لموضوع يناقش مشكلتك

بلى يمكن العمل على نموذج احد وانما عرضت عليك ما رأيته الافضل جرب : عدل على اسم العميل اولا ثم انتقل الى اي حقل تريد وعدل عليه فسترى انه يقبل والحفظ يستجيب من هذا يمكن ان نقول : يمكنك تعديل الكود حتى يقبل التعديل وذلك بزيادة الشروط حسب الحقول الموجودة فالكود اعلاه يقول : اذا عدد اسم العميل في الجدول اكبر من او يساوي واحد بشرط ان اسم العميل في الجدول يساوي اسم العميل في النموذج . وزيادة الشروط هكذا : اذا عدد اسم العميل في الجدول اكبر من او يساوي واحد بشرط ان اسم العميل في الجدول يساوي اسم العميل في النموذج والعنوان في الجدول يساوي العنوان في النموذج والهاتف في الجدول يساوي الهاتف في النموذج وهكذا ... اذا لم تتمكن من التطبيق سأحاول ارفاق مثال من عندي

الدالة mid تقوم باقتطاع عدد معين من الرقم حسب الاختيار فمثلا العدد 1637524890 مكون من 10 ارقام mid("1637524890",4,3) سترجع بــ او بتعبير آخر ستقتطع العدد 752 فالرقم 4 يعني العدد الواقع في الخانة الرابعة من اليسار والعدد 3 يعني ثلاث خانات بعد العدد الرابع او بالاصح ثلاث خانات مع العدد الرابع

لن تخرج المسألة عن شيئين 1- اعدادات المنطقة واللغة 2- نسخة الاوفيس

معذرة فأنا لم اطلع على المرفق بسبب الاصدار ولكن من واقع تجربة يمكنك التعديل على اسم العميل فقط لان الشرط واقع عليه والطريقة الفضلى لادخال البيانات انيصبح النموذج للادخال فقط من خصائص النموذج / لسان التبويب بيانات /اجعل القيمة : ادخال بيانات=نعم بكذا بمجرد الحفظ سيختفي السجل ولا يمكن التعديل عليه ولا مانع من وضع الضوابط مثل الكود اعلاه اما التعديل فشأنه مختلف ويمكن اجراء التعديل من نموذج آخر لايشتمل على هذا الكود

السلام عليكم المشكلة نابعة من وقت الحدث وهو قبل التحديث اذا كنت تسعى لزيادة الضبط في الادخال فاستخدم نموذج ادخال بيانات وللتعديل استخدم نموذج عرض

الطريقة الاولى الصف / الشعبة / المادة / الفترة / المخرج / اظهار جميع الطلاب الطريقة الثانية الصف / الشعبة / المادة / الفترة / اسم الطالب / اظهار جميع المخرجات

استعمل هذا التعبير mydate: Mid([snumber];1;4)+"/"+Mid([snumber];5;2)+"/"+Mid([snumber];7;2) ويمكن استبدال علامة الزائد بـ &

اقرب مثال للطريقة التي افكر فيها هو هنا في هذه المشاركة ما رأيك ان نتعاون على تحوير المثال لتطبيق فكرتك

اللهم اغفر وارحم والدة ابي آلاء واسكنها جنتك أحسن الله عزاءك ، انا لله وانا اليه راجعون

عليكم السلام لتصفية تواريخ من حقلين منفصلين داخل الجدول اكتب في معيار حقل البداية : اكبر من كذا. وفي معيار حقل النهاية : اصغر من كذا

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

يعدل العنوان وينقل لقسم إكسل