Interfaccia SelectedItem

Articolo
08/11/2011

Rappresenta i progetti o gli elementi di progetto selezionati nell'ambiente di sviluppo integrato (IDE) di Visual Studio.

Spazio dei nomi: EnvDTE
Assembly: EnvDTE (in EnvDTE.dll)

Sintassi

'Dichiarazione
<GuidAttribute("049D2CDF-3731-4CB6-A233-BE97BCE922D3")> _
Public Interface SelectedItem

[GuidAttribute("049D2CDF-3731-4CB6-A233-BE97BCE922D3")]
public interface SelectedItem

[GuidAttribute(L"049D2CDF-3731-4CB6-A233-BE97BCE922D3")]
public interface class SelectedItem

[<GuidAttribute("049D2CDF-3731-4CB6-A233-BE97BCE922D3")>]
type SelectedItem =  interface end

public interface SelectedItem

Il tipo SelectedItem espone i seguenti membri.

Proprietà

	Nome	Descrizione
	Collection	Ottiene l'insieme SelectedItems contenente l'oggetto SelectedItem che lo supporta.
	DTE	Ottiene l'oggetto estensibilità di primo livello.
	Info	Infrastruttura. Solo per utilizzo interno di Microsoft.
	InfoCount	Infrastruttura. Solo per utilizzo interno di Microsoft.
	Name	Ottiene il nome dell'oggetto SelectedItem.
	Project	Ottiene l'oggetto Project associato all'oggetto SelectedItem.
	ProjectItem	Ottiene l'oggetto ProjectItem associato all'oggetto specificato.

In alto

Esempi

Sub SelectionContainerSelectedItemExample()
   Dim SelItems As SelectedItems
   Dim SelItemObj As SelectedItem
   Dim SelContain As SelectionContainer
   Dim SelItem As SelectedItem
   Dim NameStr As String

   SelItems = DTE.SelectedItems
   ' List the number of items selected.
   If SelItems.MultiSelect = True Then
      MsgBox("You have " & SelItems.Count & " items selected in _
        Solution Explorer.")
   End If

   ' Set a reference to the first selected item.
   SelItemObj = SelItems.Item(1)
   ' List the names of the project or project items under the selected 
   ' item.
   For Each SelItem In SelItemObj.Collection
      NameStr = NameStr & SelItem.Name
      If TypeOf SelItem.Project Is Project Then
         NameStr = NameStr & " Project-" & SelItem.Project.Name & vbCrLf
      Else
         If TypeOf SelItem.ProjectItem Is ProjectItem Then
             NameStr = NameStr & SelItem.ProjectItem.FileNames(1) & vbCrLf
         End If
      End If
   Next
   MsgBox("You selected: " & NameStr)
End Sub

Vedere anche

Riferimenti

Spazio dei nomi EnvDTE

Condividi tramite