كيف اخفي شريط القوائم

أخي الكريم

السلام عليكم

يمكنك استخدام الكود التالي

Dim CBar As CommandBar
   Set CBar = CommandBars("NameOfCommandBar")
   CBar.Visible = False

تحياتي

شكرا اخي لهذا الرد السريع ولكن ما اريد هو اخفاء شريط القوائم وليس شريط الادوات ، وبمعنى اخر اريد ان اخفي شريط القوائم الذي فيه ملف تحرير و عرض . . . . ، الذي يظهر اجباريا مع برنامج الاكسس

وشكرا على كل حال

أخي الكريم

السلام عليكم

أسهل حل هو إنشاء شريط قوائم فارغ وتحديده كشريط قوائم لأول نموذج في البرنامج

تحياتي

اخي لقد عملت باقتراحك ولكن لا زال يخرج علي شريط القوائم الموجود في اكسس ( الشريط العام ) الذي يوجد فيه ملف ، تحرير ، . . . . فماهو العمل

أخي الكريم

السلام عليكم

آمل اتباع الخطوات التالية

أنشئ شريط أدوات جديداً وغير الخاصية إلى شريط قوائم عن طريق عرض خصائص الشريط من عرض >>> أشرطة أدوات >>> تخصيص ثم حدد الشريط ثم انقر زر خصائص ثم حدد شريط قوائم من القائمة

افتح النموذج الرئيسي في برنامجك والذي يتم فتحه عند تشغيل البرنامج وفي صفحة الخصائص الخاصة بالنموذج سوف تجد خاصية شريط القوائم حدد فيها الشريط الذي أنشأته

تحياتي