اخواني الأعزاء
اشكر لكم في البداية ردكم الجميل ، وأفيدكم بأني وجدت الحل والحمد لله ،ولكن ليست بنفس طريقتكم ،، فطريقتكم اعرفها جيداً ،، ولكن مع الأسف الشديد لم تنجح معي لذلك وضعت مشاركتي وبشكل واضح، ولا أمدح نفسي ولكن لدي ولله الحمد خبرة طويلة في برنامج الأكسس وقد صممت برامج كثيرة جدا والحمد لله ، ثم انقطعت عن ذلك فترة ٣ سنوات لذلك عندما ثبت اخر الاصدارات وجدت بعض الفروقات وكانت من ضمنها المشكلة التي واجهتني وذكرتها في الأعلى.
المشكلة الحقيقية هي ان برمجة vba الموجودة بإصداري لاتدعم اللغة العربية ، هل هي بسبب نسخة الويندوز ١٠ ، او نسخة الأوفيس ، الله أعلم.
ولكني بحثت كثيراً حتى في المواقع الأجنبية إلى ان وجدت الحل في أحد المواقع الأجنبية، وكانت الفكرة بأن اقوم بإنشاء جدول فيه الرسائل التي أريد اظهارها في مربع الرسائل ثم اقوم باستدعائها حسب الطلب في صفحة الأكواد
وقمت بإضافة الكود التالي لتعريف دالة جديدة
ثم بعد ذلك قمت بكتابة كود الاستدعاء في زر الأمر الذي اريد الضغط عليه ليظهر مربع الرسالة
باستخدام دالة Dlookup
حيث أن اسم الحقل الذي يوجد به الرسائل بالعربي هو (MyArabic_text)
اسم الجدول هو (Text_table)
رقم الحقل الأساسي id=1 تعني خذ الرسالة التي رقم حقلها الأساسي ١
وبهذا الشكل تم حل مشكلتي
اتمنى ان تكون الفكرة واضحة ،، وللعلم فقد وجدت الحل من خلال هذا الرابط
https://stackoverflow.com/questions/55210315/how-do-i-display-a-messagebox-with-unicode-characters-in-vba
كنت أيضا أريد ان ارفق نسخة من البرنامج ولكن مع الأسف حجمه كبير ولا يحق لي نشره رغم أني بنيته من الصفر