CodeClass.Kind Property

public:
 property EnvDTE::vsCMElement Kind { EnvDTE::vsCMElement get(); };

public:
 property EnvDTE::vsCMElement Kind { EnvDTE::vsCMElement get(); };

[System.Runtime.InteropServices.DispId(5)]
public EnvDTE.vsCMElement Kind { [System.Runtime.InteropServices.DispId(5)] [System.Runtime.InteropServices.TypeLibFunc(1024)] get; }

[<System.Runtime.InteropServices.DispId(5)>]
[<get: System.Runtime.InteropServices.DispId(5)>]
[<get: System.Runtime.InteropServices.TypeLibFunc(1024)>]
member this.Kind : EnvDTE.vsCMElement

Public ReadOnly Property Kind As vsCMElement

Property Value

A vsCMElement value.

Attributes

DispIdAttribute TypeLibFuncAttribute

Examples

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 objCodeType As CodeType  
        Dim objCMElem As vsCMElement  
        objTextSel = CType(dte.ActiveDocument.Selection, TextSelection)  
        objCodeCls = CType(objTextSel.ActivePoint.CodeElement(vsCMElement.vsCMElementClass), CodeClass)  
        ' Add DocComment to CodeClass objCodeClass.  
        objCodeCls.DocComment = "<DOC>DocComment for the CodeClass object</DOC>"  
        MessageBox.Show(objCodeCls.DocComment)  
        ' Test if a CodeType object is obtainable from the CodeClass  
        If objCodeCls.IsCodeType Then  
            ' then we can cast the CodeClass to a CodeType.  
            objCodeType = CType(objCodeCls, CodeType)  
        Else  
            ' The CodeClass object is not a CodeType but is  
            ' some Kind of element.  
            objCMElem = objCodeCls.Kind  
        End If  
    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;  
      CodeType objCodeType;  
      vsCMElement objCMElem;  
      objTextSel = (TextSelection)dte.ActiveDocument.Selection;  
      objCodeCls = (CodeClass)objTextSel.ActivePoint.get_CodeElement(vsCMElement.vsCMElementClass);  
      // Add DocComment to CodeClass objCodeClass.  
      objCodeCls.DocComment = "<DOC>DocComment for the CodeClass object</DOC>";  
      MessageBox.Show(objCodeCls.DocComment);  
      // Test if a CodeType object is obtainable from the CodeClass  
      if (objCodeCls.IsCodeType)  
      { // then we can cast the CodeClass to a CodeType.  
         objCodeType = (CodeType)objCodeCls;  
      }  
      else // The CodeClass object is not a CodeType but is  
      {    // some Kind of element.  
         objCMElem = objCodeCls.Kind;  
      }  
   }  
   catch (Exception ex)  
   {   
      MessageBox.Show(ex.Message);  
   }  
}  

Remarks