EditPoint2.Delete(Object) 方法

定义

删除指定范围内的文本。

public:
 void Delete(System::Object ^ PointOrCount);
public:
 void Delete(Platform::Object ^ PointOrCount);
void Delete(winrt::Windows::Foundation::IInspectable const & PointOrCount);
[System.Runtime.InteropServices.DispId(135)]
public void Delete (object PointOrCount);
[<System.Runtime.InteropServices.DispId(135)>]
abstract member Delete : obj -> unit
Public Sub Delete (PointOrCount As Object)

参数

PointOrCount
Object

必需。 表示是 TextPoint 对象还是字符数。

实现

属性

示例

Sub DeleteExample()  
   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  

   ' Change the first letter of the fourth word of the fourth line.  
   objEditPt.StartOfDocument()  
   objEditPt.LineDown(3)  
   objEditPt.WordRight(3)  
   objEditPt.CharRight(2)  
   objEditPt.Charleft(2)  
   objeditpt.Delete(1)  
   objEditPt.Insert("p")  
End Sub  

注解

如果 PointOrCount 是一个 TextPoint 对象,则 Delete 删除编辑点和之间的文本 PointOrCount 。 如果 PointOrCount 是一个整数,则 Delete 从编辑点之后的指定字符数中删除文本,并在每行末尾为每个隐含的换行序列添加一个文本。

如果 PointOrCount 为负,则 Delete 删除编辑点之前的文本。

适用于