ToolBox::ActiveTab Property

Sub ActiveTabExample()
    ' This activates a specific tab in 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

    If tlBox.ActiveTab.Name <> "MyTab" Then
        ' Activate the second tab in the Toolbox.
        tbxTabs.Item(2).Activate()
    End If
End Sub