رسالة تنبيه

[حسين العربى]

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

اوريد رسالة تنبيه بشرطين في زر امر اختبار

الشرط  اذا كان الرقم الذي في حقل text1 يبدأ برقم ( 7  ) والحقل text2 يوجد به رقم ( 7 ) يعطي رسالة تنبيه 

وشكرا 

اليكم مثال للتطبيق عليه 

 

test1.accdb

[أبوبسمله]

وعليكم السلام

اتفضل اخى @حسين العربى ان شاء الله يكون ما تريد

تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق

test1.accdb

[jjafferr]

وعليكم السلام 🙂

 

تفضل :

    If Left(Me.text1, 1) = 7 And InStr(Me.text2, 7) > 0 Then
        MsgBox "رسالة التنبيه هنا"
    End If

 

جعفر

[حسين العربى]

ده كرم كتير والله استاذي الفاضل  أحمد الفلاحجى  واستاذي  الفاضل jjafferr  بارك الله فيكم 

 

جاري التجربه علي برنامجي

[حسين العربى]

الف شكر اساتذتي الافاضل هذا هو المطلوب

مش عارف اعطي مين احسن اجابه الاجابتين نفس الشي

[jjafferr]

انت سؤالك كان

منذ ساعه, حسين العربى said:

والحقل text2 يوجد به رقم ( 7 )

 

في الحقل text2 ، جرب الرقم 1231231172564 واخبرنا النتيجة 😁

 

اما لو سؤالك كان: والحقل text2 = رقم ( 7 ) ، فالموضوع مختلف 🙂

 

جعفر

[حسين العربى]

ده الكود بتاع استاذي الفاضل احمد 

If Left(text1, 1) = 7 And Me.text2 = 7 Then
MsgBox "ÊäÈíå"
'Me.Undo
DoCmd.CancelEvent
End If

وده الي اعتمدته عندي لاني ده هو المطلوب

[أبوبسمله]

 

14 دقائق مضت, jjafferr said:

انت سؤالك كان

1 ساعه مضت, حسين العربى said:

والحقل text2 يوجد به رقم ( 7 )

 

في الحقل text2 ، جرب الرقم 1231231172564 واخبرنا النتيجة 😁

 

اما لو سؤالك كان: والحقل text2 = رقم ( 7 ) ، فالموضوع مختلف 🙂

 

جعفر

معك حق اخى واستاذى العزيز جعفر فانا اعتمدت على = 7

ولكن نظرتك اشمل جزاك الله خيرا بتعلمينا وتذكيرنا بالدوال

اسال الله ان يرزقك الفردوس الاعلى انت وجميع اخوانى واساتذتى

واجمل باقات الورود معطره بذكر الرحمن يحفظكم ويزيدكم من فضله وعلمه