muslim-es

على الرحب والسعة يا أخي / عزيز ،،،، إحنا حاضرين للطيبين ,,,,, شاكر

على الرحب والسعة أخي / طلال شاكر

عفوا يا أخي / عزيز بإمكانك الحصول على ما تريد عند كتابتك للرقم ( 5 ) مثلا في الحقل ( f ) والتاريخ 1/1/1424 هـ في الحقل ( A ) تحصل على التاريخ المطلوب في الحقل ( B ) وهو 5/1/1424 هـ وأيضا عند كتابتك الرقم ( 10 ) سوف يكون التاريخ ( 10/1/1424 هـ ) قم بتغيير الكود…

أخي عزيز ،،، بالنسبة للكود فقد عملت مثالا وطبقته وقد عمل معي تماما ،،،، قم بنسخ الكود ولصقه في برنامجك ،،، كي يعمل بالشكل الصحيح . بالنسبة لسؤالك الثاني : الحقل ( f ) هو رقم من بين هذه الارقام ( 5 ، 10 ، 15 ،30 ، 45 ، 60 ) تريد عند كتابتك في حقل ( A ) وهو التا…

لاشكر على واجب يا أخي العزيز / عزيز شاكر

أخي الكريم كي تتمكن من وضع رسالة تنبيه للحفظ أو عدم الحفظ ضع هذا الكود في زر لحفظ السجل : Dim msg, style, title, result msg = "سيتم الآن حفظ البيانات !!! هل ترغب في الاستمرار ؟؟" style = vbYesNo title = " تنبيه- حفظ بيانات" result = msgbox(msg, style, title) I…

أخي الكريم في هذه الحالة سوف يتحتم عليك كتابة تاريخ في الحقل الثاني ( B ) قم بوضع هذا الكود في الحقل الثاني ( B ) في حدث بعد التحديث : If b > A + 60 Then MsgBox "التاريخ المدخل أكبر من التاريخ الاول بأكثر من شهرين" Me.Undo End If معنى هذا الكود ، أنه في حالة ك…

أخي الكريم اقتباس الجواب على سؤالك الاول وهو السماح بعدة محاولات ولتكن ثلاث محاولات مثلا : إذهب للنموذج ( pass4 ) ، و أنشئ عليه حقل غير منضم وسمه ( S ) اجعل القيمة الافتراضية لهذا الحقل ( S ) : صفر إي ( 0 ) يوجد على هذا النموذج زر أمر مكتوب عليه ( موافق ) واسم…

عفوا ،،،، نسيت شيئا هاما ،،، سوف يكون اسم الجدول ( t3 ) كما في الكود =DSum("";"t3";"[n]=[n1]") شاكر

أخي العزيز / فتى الوادي نفرض أن الحقول في الجدول على النحو التالي : الحقل ( n ) ويشير إلى ( الاسم ) الحقل ( b ) ويشير إلى ( المبلغ ) الحقل ( d ) ويشير إلى ( التاريخ ) يوجد عندك نموذج لهذه الحقول ويزيد عليها حقل رابع وهو لظهور مجموع المبالغ التي تخص الشخص المكت…

أخي العزيز / أبوعبدالله2 نفرض أن عندك حقل ( A ) وهو رقم الطلب في جدول الطلبات واسم النموذج ( T ) نفرض أن عندك حقل ( B ) وهو رقم العقد في جدول العقود واسم النموذج ( Q ) أنشأت إستعلام إلحاق من جدول الطلبات إلى جدول العقود بعد كتابة رقم الطلب وجميع الحقول المتعلق…

مرحبا أخي / AZIZ1389 ضع الاربعة أوامر هذه Me![a].Enabled = true Me!.Enabled = true Me![c].Enabled = true Me![f].Enabled = true في هذا الزر ( C10 ) وهو زر الذهاب للسجل الجديد شاكر

عزبزي / AZIZ1389 ضع في حقل التاريخ ( A ) بعد التحديث هذا الامر : B=A+60 أي معنى هذا أنه بعد كتابة التاريخ في الحقل ( A ) سوف يقوم مباشرة بوضع التاريخ في الحقل ( B ) والزيادة عليه بـ ( 60 ) يوما ,,,,, أي شهرين كما طلبت شاكر

الاخ العزيز / AZIZ1389 نفس الطريقة عندما تريد أن تسجل في الحقل ( a ) قم بتعطيل باقي الحقول بالامر هذا : Me!.Enabled = false Me![c].Enabled = false Me![f].Enabled = false وهكذا عندما تريد التسجيل في الحقل ( b ) قم بتعطيل باقي الحقول بالامر هذا Me![a].Enabled = …

مرحبا أخي / AZIZ1389 الحمد لله على السلامة ، والوصول للعملية بالشكل الصحيح شاكر

مع التحية للاخ / أبو رجب كلام الاستاذ / ابن مسقط صحيح ومنطقي فعلا ،،، ولكن ربما تكون لك اسباب لعمل مثل هذه الطريقة لنفترض أن لديك حقلين حقل صادر واسمه ( a ) وحقل وارد اسمه ( b ) ضع هذا الامر في حقل الصادر ( a ) في حدث ( بعد التحديث ) ,,, Me!.Enabled = False هذ…

لا يا أخي / AZIZ1389 يوجد حدث بعد التحديث في ( مجموعة الخيار ) اعمل مجموعة خيار كما شرحت لك ثم اذهب إلى خصائص هذه المجموعة سوف ترى من ضمن خصائص المجموعة ( بعد التحديث ) ،،، ضع الكود الموجود في هذا الحدث عملت لك مثالا ولكن مع الاسف ليس مفعلا حتى الان عملية إرفا…

حياك الله أخي / AZIZ1389 على الرحب والسعة ،،، إحنا حاضرين للطيبين ,,, شاكر

أخي العزيز من أشرطة الادوات يوجد شريط إسمه ( مربع الادوات ) يوجد به خيار إسمه ( مجموعة خيار ) ,,,,, هذا ما قصدته إعمل ( مجموعة خيار ) كما شرحت لك سابقا أنشيء نموذج وضع فيه مجموعة خيارات وضع لها اسما ( sh ) الخيار الاول : مدة الدورة الخيار الثاني : مدة الحسم ال…

عفوا يا أخي أعتقد أن الكود يوجد فيه زيادة عن طريق وضعه بالضغط على زر ( code ) سوف اضعه لك كما هو بدو ن الضغط على الزر ،،،، هذا هو If sh = 1 Then Me![sl].ControlSource = a ElseIf sh = 2 Then Me![sl].ControlSource = b ElseIf sh = 3 Then Me![sl].ControlSource = c…