Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
Values
ID
Top
Collapse the table of content
Expand the table of content

Values Property

Visual Studio .NET 2003

Returns a collection of values for the attribute.

[Visual Basic .NET]
Public ReadOnly Property Values() As Variant
[Visual Basic 6]
Property Get Values() As Variant
[C++]
HRESULT __stdcall get_Values(
   /* [out, retval] */ VARIANT* retVal
);
[C#]
object Values {get;}
[JScript .NET]
public function get Values() : Object

Remarks

Returns a Safe-Array of strings containing the values of the attribute. Attributes may have more than one value at a time.

Example

Sub ValuesExample()
   '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)
   MsgBox("ContextAttributes value: " & DTE.ContextAttributes.Item(1).Values(0))

   ' 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

See Also

Applies To: ContextAttribute Object

Show:
© 2015 Microsoft