>
Private MenuBarItem As Office.CommandBarControl
Private WithEvents MenuItem As Office.CommandBarButton // C#
private Office.CommandBar MainMenuBar = null;
private Office.CommandBarControl MenuBarItem = null; private Office.CommandBarButton MenuItem = null;
2.在OfficeCodeBehing类中增加下列程序（通过项目模板建立），这段程序初始化了先前声明的MainMenuBar和MenuItemBar对象。
' Visual Basic Private
Sub InitMenuBarItems(ByVal Caption As String)
Try MainMenuBar = ThisApplication.CommandBars( _ "Worksheet Menu Bar")
MenuBarItem = MainMenuBar.Controls.Add( _ Office.MsoControlType.msoControlPopup, Temporary:=True) MenuBarItem.Caption = Caption Catch ex As Exception MessageBox.Show(ex.Message, _
ex.Source, MessageBoxButtons.OK, Mess页码：[1] [2] [3] [4] [5] [6] [7] [8] [9] 第3页、共9页 |
