Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Erstellt ein persistentes Befehlsleisten-Steuerelement für den Befehl.
Namespace: EnvDTE
Assembly: EnvDTE (in EnvDTE.dll)
Syntax
'Declaration
Function AddControl ( _
Owner As Object, _
Position As Integer _
) As Object
Object AddControl(
Object Owner,
int Position
)
Object^ AddControl(
[InAttribute] Object^ Owner,
[InAttribute] int Position
)
abstract AddControl :
Owner:Object *
Position:int -> Object
function AddControl(
Owner : Object,
Position : int
) : Object
Parameter
- Owner
Typ: System.Object
Erforderlich.Ein CommandBar-Objekt, dem das neue Befehlsleisten-Steuerelement hinzugefügt werden soll.
- Position
Typ: System.Int32
Dies ist optional.Die Indexposition auf der Befehlsleiste (beginnend bei Eins), an der das neue Steuerelement eingefügt werden soll.
Rückgabewert
Typ: System.Object
Ein CommandBarControl-Objekt.
Hinweise
Das Steuerelement und seine Position werden von der Umgebung gespeichert. Diese werden entsprechend den ContextUIGUIDs des Befehls oder den Antworten auf die QueryStatus Method-Methode in allen neuen Sitzungen der Umgebung verfügbar gemacht, unabhängig davon, ob das Add-In geladen wird.
Beispiele
' Macro code.
Imports Microsoft.Office.Core
Sub AddControlExample()
' Before running, you must add a reference to
' Microsoft.VisualStudio.CommandBars. 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.AddControl(cmdbarobj)
cmds.AddNamedCommand(colAddins.Item(1), "MyCommand", "Button Text", "Some tooltip", True)
End Sub
.NET Framework-Sicherheit
- Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.