ContextAttributes.Add 方法

向 ContextAttributes 集合中添加特性名称/值对。

命名空间：  EnvDTE
程序集：  EnvDTE（在 EnvDTE.dll 中）

语法

声明
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

参数

• AttributeName
  类型：System.String
  必选。新特性的名称。

• AttributeValue
  类型：System.String
  必选。新特性的值。

• Type
  类型：EnvDTE.vsContextAttributeType
  必选。一个 vsContextAttributeType 常数，指定新特性的类型。

返回值

类型：EnvDTE.ContextAttribute
ContextAttribute 对象。

备注

Add 允许向集合（上下文包）中添加新特性或者创建关键字。

备注

如果对其调用该方法的集合对象的 Type 设置为 vsContextAttributesGlobal 的集合对象调用此方法，则此方法将失败，并产生 E_NOTIMPL。

示例

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 安全性

• 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息，请参见通过部分受信任的代码使用库。

请参见

参考

ContextAttributes 接口

EnvDTE 命名空间