TextSelection.DestructiveInsert 方法

插入文本的同时覆盖现有文本。

命名空间:  EnvDTE
程序集:  EnvDTE(在 EnvDTE.dll 中)

语法

声明
Sub DestructiveInsert ( _
    Text As String _
)
void DestructiveInsert(
    string Text
)
void DestructiveInsert(
    [InAttribute] String^ Text
)
abstract DestructiveInsert : 
        Text:string -> unit 
function DestructiveInsert(
    Text : String
)

参数

  • Text
    类型:System.String
    必选。表示要插入的文本。

备注

换行符会导致文本选定范围的活动端移动到下一行的行首。 根据文本文档中所使用的语言,它还可能会插入缩进。

示例

Public objSel As TextSelection = DTE.ActiveDocument.Selection

Sub DestructiveInsertExample()
   ' Before running this example, open a text document.
   ' Perform operations on the text.
   objSel.StartOfDocument(False)
   Position(vsStartOfLineOptions.vsStartOfLineOptionsFirstColumn, 4)
   objSel.Copy()
   Position(vsStartOfLineOptions.vsStartOfLineOptionsFirstText, 4)
   objSel.Cut()
   Position(vsStartOfLineOptions.vsStartOfLineOptionsFirstText, 4)
   objSel.Delete()
   Position(vsStartOfLineOptions.vsStartOfLineOptionsFirstText, 4)
   objSel.DeleteLeft(6)
   objSel.DestructiveInsert("NEW TEXT")
End Sub

Sub Position(ByVal pos As vsStartOfLineOptions, ByVal ipos As Integer)
   ' Moves the insertion point down to the beginning of the next line, 
   ' and then highlights the right-most four characters.
   objSel.LineDown()
   objSel.StartOfLine(vsStartOfLineOptions.vsStartOfLineOptionsFirstText)
   objSel.CharRight(True, 4)
End Sub

.NET Framework 安全性

请参见

参考

TextSelection 接口

EnvDTE 命名空间