الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

التحكم ب menubar في البرنامج

بدأه nicemessenge في 10 أغسطس 2010 · 6 رد · 758 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

اخواني الكرام في المنتدى

لدي برنامج معمول بالاكسس يمكن التبديل فيه بين اللغة الانكليزية والعربية وذلك لتظهر واجهات البرنامج باللغة التي يختارها المستخدم

ولدي مشكلة في شريط menubar حيث لدي واحد بالانكليزي والثاني بالعربي

واريد عند فتح النموذج الرئيسي للبرنامج اذا كان خيار العرض باللغة الانكليزية ان يظهر menubar الانكليزي

ويظهر العربي اذا كان خيار العرض اللغة العربية

وذلك عند حدث فتح النموذج

وشكرا لكم

تم تعديل هذه المشاركة بواسطة nicemessenge في 10 أغسطس 2010 في 23:16

#2

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

أخي الكريم، نحتاج غلى أن نعرف شيئين:

الأول: كيف نعرف أن خيار العرض هو باللغة العربية أو الإنجليزية؟

الثاني: ما هي أسماء الـmenubars المخصصة التي لديك باللغتين.

الباقي سهل، فهو مجرد تعيين لخاصية MenuBar لنموذج محدد أو للتطبيق ككل... مثلاً، إذا كان لديك نموذج اسمه frm وتريد أن تحدد له شريط قوائم اسمه mnuFrm، استخدم السطر التالي:

Forms!frm.MenuBar = "mnuFrm"

وإذا كنت تريد أن تحدد شريط قوائم اسمه mnuApplication للتطبيق كاملاً، فاستخدم السطر التالي:

Application.MenuBar = "mnuApplication"

والله أعلم...

#3

السلام عليكم

شكرا لك استاذي احمد

لقد ذكرت الحل والف شكر لك

وملخص الحل هو

if [langenglish] = -1 then

forms!main.menubar = "engbar"

else

forms!main.menubar = "arabicbar"

end if

#4

فعلا حل سهل وبسيط

#5

شكرا لجميع الاخوة المشاركين..

يمكن كذلك استخدام الامر التالي..

لاظهار شريط قائمة خاص بك..

DoCmd.ShowToolbar "Menu Bar", acToolbarYes

ولجعله مخفيا..

DoCmd.ShowToolbar "Menu Bar", acToolbarNo

طبعا menuebar هو اي شريط قوائم "يجب تغيير الاسم"

يمكن ساعتها استخدام شريطي قوائم، واحد يظهر والثاني يختفي حسب الطلب وبالكود

مثال على الموضوع! الرجاء قراءته كاملا والاستفادة من تعليقات واضافات الاخوة الكرام..

http://www.arabteam2...howtopic=137016

تحياتي

تم تعديل هذه المشاركة بواسطة همام ابوعرقوب في 14 أغسطس 2010 في 05:14 — السبب: تصحيح NO بدل Yes شكرا للاخ ياسين

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#6

الكود لجعله مخفياً

DoCmd.ShowToolbar "asd", acToolbarNo

1
#7

اه.. عفوا لم انتبه للامر

اشكرك اخي العزيز ياسين على الملاحظة وساعدلها الان

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

مواضيع مشابهة