TextSelection.PadToColumn 方法
将缓冲区中的当前行到给定列用空字符（空白）填充。
命名空间： 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
类型：Int32必需。 要填充的列数，从 1 开始。
备注
根据全局设置，PadToColumn 将制表符和空格插入到从选定文本的显示列到指定的显示列之间。 如果选定内容的活动端已经位于指定列之外，则 PadToColumn 不执行任何操作。 对于 TextSelection.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();
}
}
.NET Framework 安全性
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关详细信息，请参阅通过部分受信任的代码使用库。