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

ToolBoxTabs.Add - метод

  • Статья

Создает новую вкладку в ToolBox и добавляет ее в коллекцию ToolBoxTabs.

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

Синтаксис

'Декларация
Function Add ( _
    Name As String _
) As ToolBoxTab

ToolBoxTab Add(
    string Name
)

ToolBoxTab^ Add(
    [InAttribute] String^ Name
)

abstract Add : 
        Name:string -> ToolBoxTab

function Add(
    Name : String
) : ToolBoxTab

Параметры

  • Name
    Тип: String

    Обязательный. Имя вкладки.

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

Тип: EnvDTE.ToolBoxTab
Объект ToolBoxTab.

Примеры

Sub ToolBoxAddExample()
    ' This adds a tab to the Toolbox.
    ' Define the variables and create an object reference to the IDE's  
    ' ToolBox object.
    Dim win As Window = DTE.Windows.Item(Constants.vsWindowKindToolbox)
    Dim tlBox As ToolBox = win.Object
    Dim tbxTabs As ToolBoxTabs

    ' Create an object reference to the ToolBoxTabs object.
    tbxTabs = tlBox.ToolBoxTabs

    ' Add a new tab to the Toolbox.
    tbxTabs.Add("MyTab")
End Sub
' The following example demonstrates how to add a .NET component to the 
' Toolbox by using a path to the file. The component to be added must 
' be a .NET control, such as a Visual Basic Windows Control Library 
' component.
Sub ToolBoxItemAddExample2()
    Try
        Dim tlBox As ToolBox
        tlBox = CType(DTE.Windows.Item(Constants. _
        vsWindowKindToolbox).Object, EnvDTE.ToolBox)
        ' Create a new tab called "My Controls."
        Dim tlBoxTab As ToolBoxTab = tlBox.ToolBoxTabs. _
        Add("My Controls")
        ' Set focus to the new Toolbox tab.
        tlBoxTab.Activate()
        ' Add a .NET control as a new control in the new Toolbox tab. The 
        ' constant "vsToolBoxItemFormatDotNETComponent" alerts the Toolbox 
        ' to the type of control you are adding.
        tlBoxTab.ToolBoxItems.Add("MyDotNetControl", _
        "C:\Libraries\ADotNetControl.dll(", _
        vsToolBoxItemFormat.vsToolBoxItemFormatDotNETComponent)
    Catch ex As System.Exception
        ' Display any errors that occur.
        MsgBox("ERROR: " & ex.Message)
    End Try
End Sub

Безопасность платформы .NET Framework

См. также

Ссылки

ToolBoxTabs Интерфейс

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