ازهر عبد العزيز

الاستاذ المبدع @husamwahab ما شاء اللة عليك زادك اللة خير وبركة لكن المطلب الثاني يا استاذ اعتقد اني لم اوضح السؤال اريد كتابة العبار بشكل كود بعد هذا الكود مثال لتوضيح If Not (Me.NewRecord) وكان الحقل A والحقل B في نفس النموذج فارغان افتح نموذج C كمثال

اعتقد هناك مشكلة يا استاذ في الملف المرفق من قبلك اعتقد ان الانترنت عامل معاك عمايل كالعادة

السلام عليكم ... ارجو المساعدة في كتابة الكودات التالية 1_ كود زر الانتقال الى السجل التالي بشرط عدم اظهار سجل جديد اي التنقل فقط ضمن السجلات الموجودة 2_تكملة الكود الاتي >>>>>> (If Not (Me.NewRecord <<<<<< ولم تكن هناك حقول فارغة

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

السلام عليكم لدي نموذج Elements كيف امنع المستخد من ترك حقول فارغة حتى عند الانتقال الى سجل جديد او السجل السابق او الحفظ طبعا يوجد طريقة هي جعل الحقل مطلوب لكن هناك مشكلة في رسالة التحذير التي تظهر للمستخدم وهي غير مفهومة سوى للمصمم فهل يوجد طرية افضل واذا لا هل يمكن التحكم بنص الرسالة التحذيرية ؟؟؟؟؟؟ Elements.accdb

السلام عليكم في الحقيقة اخر مثالين للاستاذ @jjafferr لم استطيع تطبيقهما ولم اعرف اين اضع الكود بسسب ضعفي في التعامل مع الاكواد

الاساتذة المبدعين @jjafferr, @kha9009lid في الحقيقة لدي اكثر من حقل يحتاج الى قيمة افتراضية في نفس النموذج وفي بعض الاقات احتاج اعادته البعض الى الافتراضي لاني لا استطيع تذكرها كلها

السلام عليكم .... هذا كود للاستاذ المبدع @kha9009lid حاولت تطبيقة فظهرت لي رسالة الخطا كما في الصور على الرغم من ان المثال الذي ارفقة هو اشتغل معي تمام xy (3).accdb

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

الاساتذة المبدعين @أحمد الفلاحجى و @kha9009lid

سابقا حاولت عمل كود للاستاذ المبدع @ابا جودى لكني فشلت في تطبيقة لانة كان بموضوع اخر وهذا الكود Private Sub أمر14_Click() Select Case typ Case Is = y End Select End Sub

الاستاذ @Khalf اين الخطا عندي

اين بالضبط استاذ @Khalf

السلام عليكم لدي نموذج يحوي مربع تحرير وسرد typ يحوي قيمتان x,y هل بالامكان تعين القيمة الافتراضية لهذا المربع من خلال الزر case y الموجود في النموذج باستخدام دالة case is بمعنى عند الضغط على الزر case y تصبح قيمة مربع التحرير والسرد الافتراضية هي y xy.accdb

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

بالتوفيق ان شاء اللة

السلام عليكم .... لدي نموذج fxy يحتوي مربع تحرير وسرد typ يحوي قيم (x,x1,y,y ) ويوجد نموذج اخر هو finterto يحوي اربع ازرار مسميات بنفس قيم مربع التحرير والسرد كيف استطيع الدخول الى نموذج fxy من خلال هذة الازرار بشرط عند الضغط على اي زر يفتح نموذج fxy ويتغير قيمة مربع التحرير والسرد بحسب اسم الزر الذي تم ضغطة مثال عند الضغط على زر x يجب ان يفتح النموذج fxy ومربع التحرير والسرد تكون قيمتة x وهكذا بقية الازرار xy.accdb

الاساتذة @Shivan Rekany , @husamwahab الاساتذة @Shivan Rekany , @husamwahab

السلام عليكم كيف اغير اللون الموجود في هذا الكود الى كود لون اخر كمثال اريد هذا اللون 00B7EF# Me.bb.BackColor = vbGreen

السلام عليكم ... لدي نموذج v داخلة حقل vtype كيف استطيع تغيير الوان مربعات النصوص للحقل الثلاثة الموجود بمعنى لو اخترنا من حقل vtype x,x1 يتغير لون المربعات النصوص الة اللون الاخضر والاصفر اذا كان الاختيار y,y1 Root15.accdb

السلام عليكم كيف استطيع ايقاف العداد الموجود في النموذج K عندما يكون الحقل Y = C وهل بالامكان اظهار رسالة تنبية بذلك 19 (1).accdb

z

الاستاذ @Shivan Rekany شكرا جزيلا

الاستاذ @Shivan Rekany شكرا لمرورك ما اريدة جعل الحقول A, B في النموذج يعملان كعمل ثواني الساعة لكن بدل 60 ثانية تكون 9 وليس مهم سرعة العد حتى وان كانت اسرع من ثواني الساعة