اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اريد رساله تظهر اذا كان المبلغ المسحوب اكبر من الرصيد


at_aziz

الردود الموصى بها

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

 

اخواني عندي مشكله بسيطه ماعرفت احلها 

وحاولت لكن محاولاتي باءت بالفشل

 

المشكله في كود الشرط 

 

اريد عندما اضغط على زر حفظ  ويكون المبلغ المسحوب اكبر من الرصيد تظهر لي رساله  تخبرني ان المسحوب اكبر من الرصيد 

 

وضعت كود في زر الحفظ  لكن لايعمل   تظهر لي الرساله  في كل الحالات 

 

ماني عارف وين المشكله 

 

ارجو المساعده يااخوان بارك الله فيكم وجزاكم الله خير

 

في المرفق نموذج وهو جزء من برنامج شغال عليه

at1.rar

رابط هذا التعليق
شارك

اخي  آخر الارض جزاك الله خيرا

 

ما دامت الحقول غير منضمة الى جدول فلا بد ان نعرف قيمتها كعدد حتى تتم المقارنة

 

اعد كتابة الكود بما يشبه هذا :

Dim i, x As Integer
x = Me.XX
i = Me.M_SM
If i > x Then
MsgBox ("المبلغ الاصلي اكبر من الرصيد")
Exit Sub
End If

  • Like 1
رابط هذا التعليق
شارك

بعد اذن اخي الفاضل اخر الارض  الكود يعمل جيدا وان جرب وعمل جدول لتجربه عليه  ووضعت في خانة المسحوب 100 وخانة الرصيد 100 فلم يعطي رسالة  ووضعت في خانة المسحوب  150 فظهر الرسالة  ممكن في مشكله عندك 

رابط هذا التعليق
شارك

جزاك الله خير اخي الكريم ابو خليل  ...

 

نعم هو كذلك ,,,

 

ولكن كنت اود ان اكمل الأمر بالحفظ  ....

 

الاخ الكريم حسين المشكلة انها تظهر نفس الرسالة في مثال السائل سواء كان المبلغ اقل او اكبر .. 

 

والله يبعد عنا المشاكل جميعا 

 

موفقين خير ...

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information