EditPoint.DeleteWhitespace 方法
刪除水平或垂直環繞於文字緩衝區中目前位置的空字元 (空白字元)。
命名空間： EnvDTE
組件： EnvDTE (在 EnvDTE.dll 中)
語法
'宣告
Sub DeleteWhitespace ( _
Direction As vsWhitespaceOptions _
)
void DeleteWhitespace(
vsWhitespaceOptions Direction
)
void DeleteWhitespace(
[InAttribute] vsWhitespaceOptions Direction
)
abstract DeleteWhitespace :
Direction:vsWhitespaceOptions -> unit
function DeleteWhitespace(
Direction : vsWhitespaceOptions
)
參數
- Direction
型別：EnvDTE.vsWhitespaceOptions
選擇項。vsWhitespaceOptions 常數，決定要移除空格的方法與位置。
備註
DeleteWhitespace 會移除編輯點周圍的空白區 (空白字元) 或 TextSelection，而不會先將文字複製到剪貼簿。 如果 Direction 是 vsWhitespaceOptionsHorizontal，則 DeleteWhitespace 會刪除編輯點兩邊的空白字元及定位字元，一直到編輯點那一行的開頭及結尾，或是一直到遇到不是空白區的字元。 如果 Direction 是 vsWhitespaceOptionsVertical，則 DeleteWhitespace 會刪除編輯點兩邊的空白字元及定位字元，一直到文件的開頭及結尾，或是一直到遇到不是空白行的一行。 如果 Direction 是 vsWhitespaceOptionsVertical，而且目前行不是空白行，則這個方法將不會有作用。
範例
Sub DeleteWhitespaceExample(ByVal dte As DTE2)
' Create a new text file.
dte.ItemOperations.NewFile()
' Create an EditPoint at the start of the new document.
Dim doc As TextDocument = _
CType(dte.ActiveDocument.Object("TextDocument"), TextDocument)
Dim point As EditPoint = doc.StartPoint.CreateEditPoint
Dim i, j As Integer
' Insert 10 lines of text.
For i = 1 To 10
point.Insert("This is a test." & vbCrLf)
Next
If MsgBox("Remove all spaces between words?", MsgBoxStyle.YesNo) _
= MsgBoxResult.Yes Then
point.StartOfDocument()
For i = 1 To 10
For j = 1 To 3
point.WordRight()
point.DeleteWhitespace( _
vsWhitespaceOptions.vsWhitespaceOptionsHorizontal)
Next
point.StartOfLine()
point.LineDown()
Next
End If
End Sub
public void DeleteWhitespaceExample(DTE2 dte)
{
// Create a new text file.
dte.ItemOperations.NewFile(@"General\Text File", "",
Constants.vsViewKindPrimary);
// Create an EditPoint at the start of the new document.
TextDocument doc =
(TextDocument)dte.ActiveDocument.Object("TextDocument");
EditPoint point = doc.StartPoint.CreateEditPoint();
// Insert 10 lines of text.
for (int i = 1; i <= 10; ++i)
point.Insert("This is a test.\n");
if (MessageBox.Show("Remove all spaces between words?", "",
MessageBoxButtons.YesNo) == DialogResult.Yes)
{
point.StartOfDocument();
for (int i = 1; i <= 10; ++i)
{
for (int j = 1; j <= 3; ++j)
{
point.WordRight(1);
point.DeleteWhitespace(
vsWhitespaceOptions.vsWhitespaceOptionsHorizontal);
}
point.StartOfLine();
point.LineDown(1);
}
}
}
.NET Framework 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊，請參閱從部分受信任程式碼使用程式庫。