CodeVariable2.Access – vlastnost
Nastaví nebo získá přístup k atributům tohoto zboží.
Obor názvů: EnvDTE80
Sestavení: EnvDTE80 (v EnvDTE80.dll)
Syntaxe
'Deklarace
Property Access As vsCMAccess
Get
Set
vsCMAccess Access { get; set; }
property vsCMAccess Access {
vsCMAccess get ();
void set (vsCMAccess value);
}
abstract Access : vsCMAccess with get, set
function get Access () : vsCMAccess
function set Access (value : vsCMAccess)
Hodnota vlastnosti
Typ: EnvDTE.vsCMAccess
Hodnota vsCMAccess.
Implementuje
Poznámky
Vrátí skutečný přístup a jak může jiný kód přístup prvek tohoto kódu.
Poznámka
Tato vlastnost je pouze pro kód prvky z Visual Basic zdrojový kód.
Hodnoty prvků modelu kód jako třídy, struktury, funkce, atributy, delegátů a tak dále mohou být také-deterministický po provedení určité typy úprav, což znamená, že jejich hodnoty nelze dovolávat vždy zůstává stejné. Další informace naleznete v části Změna hodnoty prvku modelu kódu Discovering Code by Using the Code Model (Visual Basic).
Příklady
Sub AccessExample(ByVal dte As DTE2)
' Before running this example, open a code document from a project
' and place the insertion point inside a variable definition.
Try
' Retrieve the CodeVariable at the insertion point.
Dim sel As TextSelection = _
CType(dte.ActiveDocument.Selection, TextSelection)
Dim var As CodeVariable = _
CType(sel.ActivePoint.CodeElement( _
vsCMElement.vsCMElementVariable), CodeVariable)
' Display the CodeVariable's accessibility.
Dim access As String
Dim varAccess As vsCMAccess = var.Access
Dim val As vsCMAccess
For Each val In [Enum].GetValues(varAccess.GetType())
If (val And varAccess) <> 0 Then
access &= val.ToString() & vbCrLf
End If
Next
MsgBox(var.Name & " has the following accessibility:" & _
vbCrLf & vbCrLf & access)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
public void AccessExample(DTE2 dte)
{
// Before running this example, open a code document from a project
// and place the insertion point inside a variable definition.
try
{
// Retrieve the CodeVariable at the insertion point.
TextSelection sel =
(TextSelection)dte.ActiveDocument.Selection;
CodeVariable var =
(CodeVariable)sel.ActivePoint.get_CodeElement(
vsCMElement.vsCMElementVariable);
// Display the CodeVariable's accessibility.
string access = "";
vsCMAccess varAccess = var.Access;
foreach (vsCMAccess val in Enum.GetValues(varAccess.GetType()))
{
if ((val & varAccess) != 0)
access += val.ToString() + "\r\n";
}
MessageBox.Show(var.Name +
" has the following accessibility:\r\n\r\n" + access);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
Zabezpečení rozhraní .NET Framework
- Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.
Viz také
Odkaz
Další zdroje
How to: Compile and Run the Automation Object Model Code Examples