مشاركة عبر


TextSelection.OutlineSection أسلوب

قم بإنشاء قسم المخطط التفصيلي الحالي استناداً إلى تحديد.

مساحة الاسم:  EnvDTE
التجميع:  EnvDTE (في EnvDTE.dll)

بناء الجملة

'إقرار
Sub OutlineSection
void OutlineSection()
void OutlineSection()
abstract OutlineSection : unit -> unit 
function OutlineSection()

أمثلة

Sub OutlineSectionExample()
    ' Before running this example, open a text document.
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection

    ' Move to the beginning of the document so we can iterate over the 
    ' whole thing.
    objSel.StartOfDocument()
    While objSel.FindPattern("#if _DEBUG")
        ' If we found the beginning of a debug-only section, save the 
        ' position.
        Dim lStartLine As Long = objSel.TopPoint.Line
        Dim lStartColumn As Long = objSel.TopPoint.LineCharOffset

        ' Look for the end.
        If objSel.FindPattern("#endif") Then
            ' Select the entire section and outline it.
            objSel.SwapAnchor()
            objSel.MoveToLineAndOffset(lStartLine, lStartColumn, True)
            objSel.OutlineSection()
            objSel.LineDown()
        End If
    End While
End Sub

أمن NET Framework.

راجع أيضًَا

المرجع

TextSelection واجهة

TextSelection الأعضاء

EnvDTE مساحة الاسم