EditPoint.OutlineSection 方法

2011-08-12

根据编辑点和给定的文本点或值创建大纲部分。

命名空间： EnvDTE
程序集： EnvDTE（在 EnvDTE.dll 中）

语法

声明
Sub OutlineSection ( _
    PointOrCount As Object _
)

void OutlineSection(
    Object PointOrCount
)

void OutlineSection(
    [InAttribute] Object^ PointOrCount
)

abstract OutlineSection : 
        PointOrCount:Object -> unit

function OutlineSection(
    PointOrCount : Object
)

参数

PointOrCount
类型：System.Object
必选。或者是一个 TextPoint 对象，或者是一个表示字符数的整数。

备注

如果 PointOrCount 是一个 32 位整数，则 OutlineSection 在从编辑点到编辑点后指定字符数的文本中创建大纲部分。每行结尾的每一个隐含的换行符算一个字符。

示例

Sub OutlineSectionExample()
    ' Creates a text document with some text,
    ' and then puts the first two lines into
    ' outline view.
    Dim objTextDoc As TextDocument
    Dim objEditPt As EditPoint, iCtr As Integer

    ' Create a new text file.
    DTE.ItemOperations.NewFile("General\Text File")

    ' Get a handle to the new document and create an EditPoint.
    objTextDoc = DTE.ActiveDocument.Object("TextDocument")
    objEditPt = objTextDoc.StartPoint.CreateEditPoint

    ' Insert ten lines of text.
    For iCtr = 1 To 10
        objEditPt.Insert("This is a test." & Chr(13))
    Next iCtr
    ' Go to top of document and outline the first
    ' 31 characters (the first two lines).
    objEditPt.StartOfDocument()
    objEditPt.OutlineSection(31)
End Sub