شرح شريط الأدوات Office 2007
رقم 1= هو عبارة عن قائمة CommandBarControl
نسمية ControlFile
طبعاً الرقم الموجود في ControlFile.IconId=500
يعبر عن رقم الأيقونة Tag الموجودة في ImageList
والسطر التالي أضفنا كونترول New إلى قائمة البرنامج ورقم الأيقونه 101 الموجود أيضاً في ImageList
و &New هو الإسم الي هيظهر في القائمة
والكود التالي نفس الي قبله ولكن حبينا نضيف فاصل بينهما
أما الكود التالي إذا حبينا نظهر الأيقونات بشكل كبير
والكود التالي يعرض لنا في الجهة المقابة أيقونة صغيرة للمساعدة
و Flags يحدد مكانها على اليمين
وهذا تحميل
1- الأداة
2- مثال بسيط
3- مثال الموجود من قبل الشركة
رقم 1= هو عبارة عن قائمة CommandBarControl
نسمية ControlFile
- الكود:
Set ControlFile = RibbonBar.AddSystemButton()
ControlFile.IconId = 500
ControlFile.CommandBar.Controls.Add xtpControlButton, 101, "&New"
ControlFile.CommandBar.Controls.Add xtpControlButton, 102, "&Open..."
Set Control = ControlFile.CommandBar.Controls.Add(xtpControlButton, 104, "Pr∫ Setup...")
Control.BeginGroup = True
Set Control = ControlFile.CommandBar.Controls.Add(xtpControlButton, 105, "Recent File")
Control.BeginGroup = True
Control.Enabled = False
Set Control = ControlFile.CommandBar.Controls.Add(xtpControlButton, 106, "E&xit")
Control.BeginGroup = True
ControlFile.CommandBar.SetIconSize 32, 32
طبعاً الرقم الموجود في ControlFile.IconId=500
يعبر عن رقم الأيقونة Tag الموجودة في ImageList
والسطر التالي أضفنا كونترول New إلى قائمة البرنامج ورقم الأيقونه 101 الموجود أيضاً في ImageList
و &New هو الإسم الي هيظهر في القائمة
- الكود:
ControlFile.CommandBar.Controls.Add xtpControlButton, 101, "&New"
والكود التالي نفس الي قبله ولكن حبينا نضيف فاصل بينهما
- الكود:
Set Control = ControlFile.CommandBar.Controls.Add(xtpControlButton, 104, "Pr∫ Setup...")
Control.BeginGroup = True
أما الكود التالي إذا حبينا نظهر الأيقونات بشكل كبير
- الكود:
ControlFile.CommandBar.SetIconSize 32, 32
والكود التالي يعرض لنا في الجهة المقابة أيقونة صغيرة للمساعدة
و Flags يحدد مكانها على اليمين
- الكود:
Set ControlAbout = RibbonBar.Controls.Add(xtpControlButton, 107, "&About")
ControlAbout.Flags = xtpFlagRightAlign
وهذا تحميل
1- الأداة
2- مثال بسيط
3- مثال الموجود من قبل الشركة