• 0
محمد فؤاد تركي

مثال لكيفة أخفاء واظهار بعض القوائم في شاشة الاكسس

سؤال

أخواني الاعزاء

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

أحب أن أضع مشاركه بسيطه بين أيديكم أوضح فيها كيفية أظهار وإخفاء بعض قوائم أكسس والذي يسأل عنها الكثيرون في برامجهم عن طريق الكود

أولاً : - من خلال هذا الكود تسطيع أخفاء جميع قوائم أكسس

Dim i As Integer
For i = 1 To CommandBars.Count
CommandBars(i).Enabled = False
Next i

أيضا يمكنك اظهارها مرة أخري عن طريق هذا الكود

Dim i As Integer
For i = 1 To CommandBars.Count
CommandBars(i).Enabled = True
Next i

ثانياً : - من خلال هذا الكود يمكنك اظهار القائمة الخاصة بك

DoCmd.ShowToolbar "ضع اسم قائمتك هنا", acToolbarYes

وهذا الكود لاظهارها مرة أخري

DoCmd.ShowToolbar "ضع اسم قائمتك هنا", acToolbarNo

ثالثا ً : - من خلال هذا الكود يمكنك اخغاء نافذه الداتا بيز

DoCmd.SelectObject acTable, , True
DoCmd.RunCommand acCmdWindowHide

ويمكنك اظهارها مرة اخري من خلال هذا الكود

DoCmd.SelectObject acTable, , True

رابعاً : - من خلال هذا الكود يمكنك إزاله الرساله التي تظهر بمساعد اوفيس ونصها "Type a question for help" وهذا الكود متاح لنسخة أوفيس 2002 - 2003 فقط

Application.CommandBars.DisableAskAQuestionDropdow n = True

خامساً : - من خلال هذا الكود يمكنك منع ظهور النموذج بشريط المهام

Application.SetOption "ShowWindowsinTaskbar", False

ويمكنك اظهارة عن طريق هذا الكود

Application.SetOption "ShowWindowsinTaskbar",true

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

مرفق مثال فيه كل هذه الاكواد

Hide_unhide_Toll_bars.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

12 إجابة على هذا السؤال .

  • 0

الاخ الكريم / محمد فؤاد

رائع رائع جزاك الله كل خير ولكن هل يمكن اظهار شريط المهام في نموذج منبثق

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الله يعطيك العافية

شيء جميل

" وقل رب زدني علماً "

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله فيك اخي محمد على هذا المجهود الرائع

و إلى الأمام دائما

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله بك اخي ونفع بك ووفقك لما يحبه ويرضاه

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

جميع الاخوة الاعضاء والمشرفين

شكراً علي مروركم وبارك الله فيكم جميعاً

-waf

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

أخي محمد

بارك الله فيك وجزاك الله كل خير

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الاستاذ/ محمد فؤاد السلام عليكم

كيف يمكن اظهار القائمة الخاصة بي في نموذج منبثق

جزاك الله خير

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله فيك اخي محمد على هذا المجهود الرائع

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الله يبارك فيكم جميعا والله إن أردتم أن تشكرو فأشكرو الله ثم هذا المنتدي الذي تعلمت منه الكثير

شكرا لكم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

إخي محمد

جزاك الله الف خير

والله يعطيك الف عافية

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

مشكور جدا على المجهود الرائع

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
زوار
This topic is now closed to further replies.

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .