Imports EnvDTE
...
    Sub ToolBoxTabExample()
        Dim objToolbox As ToolBox
        Dim colTbxTabs As ToolBoxTabs
        Dim objTab As ToolBoxTab
        Dim colTbxItems As ToolBoxItems
        Dim objTbxItem As ToolBoxItem
 
        ' Create an object reference to the IDE's ToolBox object.    
        objToolbox = DTE.Windows.Item(Constants.vsWindowKindToolbox).Object
        colTbxTabs = objToolbox.ToolBoxTabs
 
        ' Add a new tab to the ToolBox.
        objTab = colTbxTabs.Add("Sample ToolBoxTab")
        colTbxTabs = objToolbox.ToolBoxTabs
 
        ' Use the ToolboxItems collection to access all the items under a 
        ' ToolBoxTab.
        colTbxItems = objTab.ToolBoxItems
 
        ' Add a couple new ToolboxItem objects to the new tab we added above.
        objTbxItem = objTab.ToolBoxItems.Add("Text Item", "Hello world")
        objTbxItem = objTab.ToolBoxItems.Add("HTML Item", "Hello world", _
          vsToolBoxItemFormat.vsToolBoxItemFormatHTML)
    End Sub

DTE.Windows

Gru? Rub

(PS: Besuch doch mal meine Seiten http://e-liquids.de und http://jjpassion.de)