ContextAttribute.Values Eigenschaft

Definition

Ruft eine Auflistung von Werten für das Attribut ab.

public:
 property System::Object ^ Values { System::Object ^ get(); };
public:
 property Platform::Object ^ Values { Platform::Object ^ get(); };
[System.Runtime.InteropServices.DispId(3)]
public object Values { [System.Runtime.InteropServices.DispId(3)] get; }
[<System.Runtime.InteropServices.DispId(3)>]
[<get: System.Runtime.InteropServices.DispId(3)>]
member this.Values : obj
Public ReadOnly Property Values As Object

Eigenschaftswert

Object

Ein-Objekt, das ein SAFEARRAY von Zeichen folgen darstellt, die die Werte des-Attributs enthalten.

Attribute

Beispiele

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  

Hinweise

Attribute können mehr als einen Wert gleichzeitig aufweisen.

Gilt für