EditPoint.Cut 方法
將指定的文字範圍複製到剪貼簿,並從文件中將其刪除。
命名空間: EnvDTE
組件: EnvDTE (在 EnvDTE.dll 中)
語法
'宣告
Sub Cut ( _
PointOrCount As Object, _
Append As Boolean _
)
void Cut(
Object PointOrCount,
bool Append
)
void Cut(
[InAttribute] Object^ PointOrCount,
[InAttribute] bool Append
)
abstract Cut :
PointOrCount:Object *
Append:bool -> unit
function Cut(
PointOrCount : Object,
Append : boolean
)
參數
- PointOrCount
型別:System.Object
必要項。可能是 TextPoint 物件或字元數目。
- Append
型別:System.Boolean
選擇項。指出是否要將選取的文字附加到剪貼簿。預設值為 false。
備註
如果 PointOrCount 是 TextPoint 物件,Cut 會剪下介於編輯點和 PointOrCount 之間的文字,然後放置到剪貼簿。 如果 PointOrCount 是整數,則 Cut 會剪下從編輯點開始直到編輯點之後指定字元數目的文字,每行結尾的隱含新行序列都算一個字元。 如果 PointOrCount 為負值,則 Cut 會剪下編輯點前面的文字。
如果 Append 是 true,則 Cut 會附加選取範圍到目前的剪貼簿內容,而不是取代選取範圍。
範例
Sub CutExample()
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
' Copies the fourth word of the fourth line and pastes it,
' then cuts the fourth word of the eighth line.
objEditPt.StartOfDocument()
objEditPt.LineDown(3)
objEditPt.WordRight(3)
objEditPt.Copy(4)
objEditPt.Paste()
objEditPt.LineDown(3)
objEditPt.WordRight(3)
objEditPt.Cut(4)
End Sub
.NET Framework 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。