Поделиться через

Commands2.AddCommandBar - метод (String, vsCommandBarType, Object, Int32)

  • Статья

Обновлен: Ноябрь 2007

Создает панель команд, которая сохраняется и становится доступна при следующем запуске среды.

Пространство имен:  EnvDTE80
Сборка:  EnvDTE80 (в EnvDTE80.dll)

Синтаксис

'Декларация
Function AddCommandBar ( _
    Name As String, _
    Type As vsCommandBarType, _
    CommandBarParent As Object, _
    Position As Integer _
) As Object
'Применение
Dim instance As Commands2
Dim Name As String
Dim Type As vsCommandBarType
Dim CommandBarParent As Object
Dim Position As Integer
Dim returnValue As Object

returnValue = instance.AddCommandBar(Name, _
    Type, CommandBarParent, Position)

Object AddCommandBar(
    string Name,
    vsCommandBarType Type,
    Object CommandBarParent,
    int Position
)

Object^ AddCommandBar(
    [InAttribute] String^ Name, 
    [InAttribute] vsCommandBarType Type, 
    [InAttribute] Object^ CommandBarParent, 
    [InAttribute] int Position
)

function AddCommandBar(
    Name : String, 
    Type : vsCommandBarType, 
    CommandBarParent : Object, 
    Position : int
) : Object

Параметры

  • Name
    Тип: System.String
    Обязательно. Имя для новой панели команд.
  • CommandBarParent
    Тип: System.Object
    Необязательно. Объект Microsoft Office Microsoft.VisualStudio.CommandBars.CommandBar, к которому должна быть добавлена новая панель команд. (Но это требуется, если Type равно vsCommandBarTypeMenu.).
  • Position
    Тип: System.Int32
    Необязательно. Индекс позиции, начиная с единицы, в панели команд, с которой будет размещена новая панель команд.

Возвращаемое значение

Тип: System.Object
Объект Microsoft.VisualStudio.CommandBars.CommandBar.

Реализации

CommandsAddCommandBar(String, vsCommandBarType, Object, Int32)

Заметки

Новая панель команд доступна каждую новую сессию среды, независимо от того, загружена ли надстройка.

Примеры

Imports Microsoft.VisualStudio.CommandBars
Sub AddCommandBarExample()
   ' Before running, you must add a reference to the Office 
   ' typelib to gain access to the CommandBar object. Also, for this 
   ' example to work correctly, there should be an add-in available 
   ' in the Visual Studio environment.
   Dim cmds As Commands
   Dim cmdobj As Command
   Dim customin, customout As Object
   Dim cmdbarobj As CommandBar
   Dim colAddins As AddIns

   ' Set references.
   colAddins = DTE.AddIns()
   cmds = DTE.Commands
   cmdobj = cmds.Item("File.NewFile")

   ' Create a toolbar and add the File.NewFile command to it.
   cmdbarobj = cmds.AddCommandBar("Mycmdbar", vsCommandBarType.vsCommandBarTypeToolbar)
   MsgBox("Commandbar name: " & cmdbarobj.Name)
   cmdobj = cmds.AddNamedCommand(colAddins.Item(1), "mycommand", "mycommand", "tooltip for mycommand", True)
End Sub

Разрешения

См. также

Ссылки

Commands2 Интерфейс

Commands2 - члены

AddCommandBar - перегрузка

EnvDTE80 - пространство имен