CodeClass.Access Özellik
Tanım
Önemli
Bazı bilgiler ürünün ön sürümüyle ilgilidir ve sürüm öncesinde önemli değişiklikler yapılmış olabilir. Burada verilen bilgilerle ilgili olarak Microsoft açık veya zımni hiçbir garanti vermez.
Nesnenin erişim özniteliklerini ayarlar veya alır CodeClass .
public:
property EnvDTE::vsCMAccess Access { EnvDTE::vsCMAccess get(); void set(EnvDTE::vsCMAccess value); };
public:
property EnvDTE::vsCMAccess Access { EnvDTE::vsCMAccess get(); void set(EnvDTE::vsCMAccess value); };
[System.Runtime.InteropServices.DispId(35)]
public EnvDTE.vsCMAccess Access { [System.Runtime.InteropServices.DispId(35)] get; [System.Runtime.InteropServices.DispId(35)] set; }
[<System.Runtime.InteropServices.DispId(35)>]
[<get: System.Runtime.InteropServices.DispId(35)>]
[<set: System.Runtime.InteropServices.DispId(35)>]
member this.Access : EnvDTE.vsCMAccess with get, set
Public Property Access As vsCMAccess
Özellik Değeri
Bir vsCMAccess değer.
- Öznitelikler
Örnekler
Public Sub CodeClassExample(ByVal dte As DTE2)
' Before running this example, open a code document from a
' project and place the insertion point inside a class definition.
Try
Dim objTextSel As TextSelection
Dim objCodeCls As CodeClass
Dim objCodeElem As CodeElement
objTextSel = CType(dte.ActiveDocument.Selection, TextSelection)
objCodeCls = CType(objTextSel.ActivePoint.CodeElement(vsCMElement.vsCMElementClass), CodeClass)
' Display the fullname of CodeClass object.
MessageBox.Show(objCodeCls.FullName)
' Prove that the parent object of a CodeClass is a CodeElement.
objCodeElem = CType(objCodeCls.Parent, CodeElement)
' Get access privilege for CodeClass.
MessageBox.Show(objCodeCls.Access.ToString())
' Change access privilege for CodeClass objCodeCls.
' Note the change in access keyword in your code document.
objCodeCls.Access = vsCMAccess.vsCMAccessPublic
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
public void CodeClassExample(DTE2 dte)
{
// Before running this example, open a code document from a
// project and place the insertion point inside a class definition.
try
{
TextSelection objTextSel;
CodeClass objCodeCls;
CodeElement objCodeElem;
objTextSel = (TextSelection)dte.ActiveDocument.Selection;
objCodeCls = (CodeClass)objTextSel.ActivePoint.get_CodeElement(vsCMElement.vsCMElementClass);
// Display the fullname of CodeClass object.
MessageBox.Show(objCodeCls.FullName);
// Prove that the parent object of a CodeClass is a CodeElement.
objCodeElem = (CodeElement)objCodeCls.Parent;
// Get access privilege for CodeClass
MessageBox.Show(objCodeCls.Access.ToString());
// Change access privilege for CodeClass objCodeCls.
// Note the change in access keyword in your code document.
objCodeCls.Access = vsCMAccess.vsCMAccessPublic;
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
Açıklamalar
Access gerçek erişimi ve diğer kodun bu kod öğesine nasıl erişebileceğini döndürür.
Not
Bu özellik, Visual Basic kaynak kodundan kod öğeleri için salt okunurdur.
Ayrıca, sınıflar, yapılar, işlevler, öznitelikler, temsilciler vb. gibi kod modeli öğelerinin değerleri, belirli tür düzenlemeler yapıldıktan sonra belirleyici olmayan bir değer olabilir, yani değerlerinin her zaman aynı kalır. Daha fazla bilgi için bkz. kod modeli öğe değerleri, kod modeli kullanılarak kod bulma bölümünde değişebilir (Visual Basic).