Aracılığıyla paylaş


ContextAttributes.Add Yöntem

Bir öznitelik ad/değer çiftini ekler ContextAttributes koleksiyonu.

Ad alanı:  EnvDTE
Derleme:  EnvDTE (EnvDTE.dll içinde)

Sözdizimi

'Bildirim
Function Add ( _
    AttributeName As String, _
    AttributeValue As String, _
    Type As vsContextAttributeType _
) As ContextAttribute
ContextAttribute Add(
    string AttributeName,
    string AttributeValue,
    vsContextAttributeType Type
)
ContextAttribute^ Add(
    String^ AttributeName, 
    String^ AttributeValue, 
    vsContextAttributeType Type
)
abstract Add : 
        AttributeName:string * 
        AttributeValue:string * 
        Type:vsContextAttributeType -> ContextAttribute 
function Add(
    AttributeName : String, 
    AttributeValue : String, 
    Type : vsContextAttributeType
) : ContextAttribute

Parametreler

  • AttributeName
    Tür: System.String
    Gerekli.Yeni bir öznitelik adı.
  • AttributeValue
    Tür: System.String
    Gerekli.Yeni bir öznitelik değeri.

Dönüş Değeri

Tür: EnvDTE.ContextAttribute
ContextAttribute nesnesi

Notlar

Add(içerik bag) koleksiyonuna yeni bir öznitelik eklemek veya anahtar sözcükleri oluşturmanızı sağlar.

Not

Koleksiyon nesnesi üzerinde aramakta yöntemi olup olmadığını Type için vsContextAttributesGlobal, bu yöntem ile başarısız E_NOTIMPL.

Örnekler

Sub AddExample()
   ' Get a reference to Solution Explorer.
   Dim SolnEx As Window = DTE.Windows.Item _
   (Constants.vsWindowKindSolutionExplorer)
   Dim CA As ContextAttribute

   ' List the current attributes associated with Solution Explorer.
   ListAttr(SolnEx, CA)

   ' Associate a new F1 keyword with Solution Explorer.
   SolnEx.ContextAttributes.Add("ANewKeyword", 900, _
   vsContextAttributeType.vsContextAttributeLookupF1)
   ListAttr(SolnEx, CA)

   ' Delete the new F1 keyword from Solution Explorer.
   SolnEx.ContextAttributes.Item(3).Remove()
   ListAttr(SolnEx, CA)
End Sub

Sub ListAttr(ByVal SolnEx As Object, ByVal CA As ContextAttribute)
   ' Support function for CATest(). Lists the current attributes 
   ' associated with Solution Explorer.
   Dim msg As String

   MsgBox("Number of context attributes in Solution Explorer: " & _
   SolnEx.ContextAttributes.Count)
   For Each CA In SolnEx.ContextAttributes
      msg = msg & CA.Name & Chr(13)
   Next
   MsgBox(msg)
   msg = ""
End Sub

.NET Framework Güvenliği

Ayrıca bkz.

Başvuru

ContextAttributes Arabirim

EnvDTE Ad Alanı