CodeProperty2.Setter 屬性

發行項
08/12/2011

取得或設定物件，用以定義程式碼以設定屬性。

命名空間： EnvDTE80
組件： EnvDTE80 (在 EnvDTE80.dll 中)

語法

'宣告
Property Setter As CodeFunction
    Get
    Set

CodeFunction Setter { get; set; }

property CodeFunction^ Setter {
    CodeFunction^ get ();
    void set (CodeFunction^ value);
}

abstract Setter : CodeFunction with get, set

function get Setter () : CodeFunction
function set Setter (value : CodeFunction)

屬性值

型別：EnvDTE.CodeFunction
CodeFunction 物件。

實作

CodeProperty.Setter

備註

Setter 會傳回這項屬性的 setter 程式碼函數 (如果有的話)。

注意事項
在特定類型的編輯之後，程式碼模型項目 (例如類別、結構、函式、屬性、委派等) 的值可能不具決定性，表示其值不一定維持相同。如需詳細資訊，請參閱使用程式碼模型探索程式碼 (Visual Basic) 的＜程式碼模型項目值可以變更＞一節。

範例

Sub SetterExample(ByVal dte As DTE2)

    ' Before running this example, open a code document from a project
    ' and place the insertion point inside a property definition.
    Try
        ' Retrieve the CodeProperty at the insertion point.
        Dim sel As TextSelection = _
            CType(dte.ActiveDocument.Selection, TextSelection)
        Dim prop As CodeProperty = CType(sel.ActivePoint.CodeElement( _
            vsCMElement.vsCMElementProperty), CodeProperty)

        ' Display the source code for the property setter.
        Dim sttr As CodeFunction = prop.Setter
        Dim start As TextPoint = sttr.GetStartPoint()
        Dim finish As TextPoint = sttr.GetEndPoint()
        Dim src As String = start.CreateEditPoint().GetText(finish)

        MsgBox(prop.Name & "'s setter source code:" & vbCrLf & _
            vbCrLf & src)
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try

End Sub