مشاركة عبر


SelectedItem الواجهة

يمثل المشاريع المحددة أو مشروع العنصر (العناصر) في Visual Studioبيئة التطوير المتكاملة (IDE).

مساحة الاسم:  EnvDTE
التجميع:  EnvDTE (في EnvDTE.dll)

بناء الجملة

'إقرار
<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

أمثلة

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

راجع أيضًَا

المرجع

SelectedItem الأعضاء

EnvDTE مساحة الاسم