EditPoint.PadToColumn 方法

2011-08-12

将缓冲区中的当前行到给定列用空字符（空白）填充。

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

语法

声明
Sub PadToColumn ( _
    Column As Integer _
)

void PadToColumn(
    int Column
)

void PadToColumn(
    [InAttribute] int Column
)

abstract PadToColumn : 
        Column:int -> unit

function PadToColumn(
    Column : int
)

参数

Column
类型：System.Int32
必选。要填充的列数，从 1 开始。

备注

根据全局设置，PadToColumn 将制表符和空格插入到从编辑点的或选定内容的显示列到指定显示列之间的位置。如果选定内容的编辑点或活动端点已经位于指定列之外，则 PadToColumn 不执行任何操作。

示例

Sub PadToColumnExample(ByVal dte As DTE2)

    ' Create a new text file.
    dte.ItemOperations.NewFile()

    ' Create an EditPoint at the start of the new file.
    Dim doc As TextDocument = _
        CType(dte.ActiveDocument.Object("TextDocument"), TextDocument)
    Dim point As EditPoint = doc.StartPoint.CreateEditPoint
    Dim i As Integer

    ' Insert 10 lines of text.
    For i = 1 To 10
        point.Insert("This is a test." & vbCrLf)
    Next i

    point.StartOfDocument()

    ' Indent text to column 10.
    For i = 1 To 10
        point.PadToColumn(10)
        point.LineDown()
        point.StartOfLine()
    Next

End Sub

public void PadToColumnExample(DTE2 dte)
{
    // Create a new text file.
    dte.ItemOperations.NewFile(@"General\Text File", "", 
        Constants.vsViewKindPrimary);

    // Create an EditPoint at the start of the new file.
    TextDocument doc = 
        (TextDocument)dte.ActiveDocument.Object("TextDocument");
    EditPoint point = doc.StartPoint.CreateEditPoint();

    // Insert 10 lines of text.
    for (int i = 0; i < 10; i++)
        point.Insert("This is a test.\n");

    point.StartOfDocument();

    // Indent text to column 10.
    for (int i = 0; i < 10; i++)
    {
        point.PadToColumn(10);
        point.LineDown(1);
        point.StartOfLine();
    }
}