CodeClass.Kind プロパティ

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

オブジェクトの型を示す列挙値を返します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
ReadOnly Property Kind As vsCMElement
'使用
Dim instance As CodeClass
Dim value As vsCMElement

value = instance.Kind

vsCMElement Kind { get; }

property vsCMElement Kind {
    vsCMElement get ();
}

function get Kind () : vsCMElement

プロパティ値

型 : EnvDTE.vsCMElement

vsCMElement 値。

解説

メモ :
特定の種類の編集を行うと、クラス、構造体、関数、属性、デリゲートなどのコードモデル要素が非確定的な値になる場合があります。つまり、これらの要素の値は、常に同じ値になるとは限りません。詳細については、「コードモデルを使用したコードの調査 (Visual Basic)」で、コードモデル要素値を変更する方法についての説明を参照してください。

特定の種類の編集を行うと、クラス、構造体、関数、属性、デリゲートなどのコードモデル要素が非確定的な値になる場合があります。つまり、これらの要素の値は、常に同じ値になるとは限りません。詳細については、「コードモデルを使用したコードの調査 (Visual Basic)」で、コードモデル要素値を変更する方法についての説明を参照してください。

例

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);
   }
}