كيف يمكن الحصول على رسالة "MsgBox" ديناميكية

[بوعبد الله محفوظ]

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

عندي تقرير أريد طباعته

لذا أضفت فورم باسم "طباعة التقرير" ثم قمت بإضافة زر وفي الحدث كتبت الكود التالية

Private Sub Command1_Click()
DoCmd.OpenReport "مصاريف العملاء", acViewPreview
End Sub

مصدر التقرير هو استعلام بنفس الاسم "مصاريف العملاء"

في خانة المعايير قمت بإضافة التالي  

Like [من فضلك أدخل رقم السنة مثلا 2016]

Like [من فضلك أدخل رقم الشهر مثلا 05]

السؤال

هل يمكن جعل السنة و الشهر ديناميكي يأخذ فيمته من تاريخ النظام

بمعنى لو كنا في شهر جانفي تأتي الرسالة

Like [من فضلك أدخل رقم الشهر مثلا 01]

أما لوكنا في شهر فيفري تأتي الرسالة

Like [من فضلك أدخل رقم الشهر مثلا 02]

وأيضا هل يمكن جعل الرسالة تأتي من اليمين إلى اليسار

بارك الله فيكم

PreTest.rar