Metoda Commands2.AddCommandBar —

Tworzy pasek poleceń, który jest zapisane i będą dostępne przy następnym uruchomieniu środowiska naturalnego.

Przestrzeń nazw:  EnvDTE80
Zestaw:  EnvDTE80 (w EnvDTE80.dll)

Składnia

'Deklaracja
Function AddCommandBar ( _
    Name As String, _
    Type As vsCommandBarType, _
    CommandBarParent As Object, _
    Position As Integer _
) As Object

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

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

abstract AddCommandBar : 
        Name:string * 
        Type:vsCommandBarType * 
        CommandBarParent:Object * 
        Position:int -> Object

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

Parametry

• Name
  Typ: String

  Wymagany.Nazwa dla nowego paska poleceń.

• Type
  Typ: vsCommandBarType

  Wymagany.A vsCommandBarType stałą, która określa typ paska poleceń:

• CommandBarParent
  Typ: Object

  Opcjonalnie.A CommandBar obiektu, do którego ma zostać dodany nowy pasek poleceń. (Jest to wymagane, jednak jeśli Type jest vsCommandBarTypeMenu.)

• Position
  Typ: Int32

  Opcjonalnie.Pozycja indeksu, zaczynając od jednego, na pasku poleceń, aby umieścić nowy pasek poleceń.

Wartość zwracana

Typ: Object
Obiekt CommandBar.

Uwagi

Nowy pasek poleceń jest dostępna podczas każdej nowej sesji środowiska bez względu na to, czy dodatek jest załadowany.

Przykłady

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

Zabezpieczenia programu .NET Framework

• Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Używanie bibliotek pochodzących z częściowo zaufanego kodu.

Zobacz też

Informacje

Commands2 Interfejs

Przestrzeń nazw EnvDTE80