この記事は翻訳者によって翻訳されたものです。 記事の文章にポインターを重ねると、原文のテキストが表示されます。
訳文
原文
このトピックはまだ評価されていません - このトピックを評価する

EditPoint.ReplaceText メソッド

選択したテキストを指定したテキストで置換します。

名前空間:  EnvDTE
アセンブリ:  EnvDTE (EnvDTE.dll 内)
void ReplaceText(
	Object PointOrCount,
	string Text,
	int Flags
)

パラメーター

PointOrCount
型: System.Object
必ず指定します。 置換するテキストを判断する TextPoint オブジェクトまたは整数。
Text
型: System.String
必ず指定します。 挿入するテキスト。
Flags
型: System.Int32
必ず指定します。 エディターの動作を表す vsEPReplaceTextOptions 定数。

ReplaceText は、エディット ポイントと PointOrCount の間にあるテキストを Text に置き換えます。置き換える際に、ブレークポイントや名前付きショートカットなどのマーカーの位置を正確に保持するよう試みます。

Sub ReplaceTextExample()
   Dim objTextDoc As TextDocument
   Dim objMovePt As EditPoint
   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")
   objMovePt = objTextDoc.EndPoint.CreateEditPoint
   objEditPt = objTextDoc.StartPoint.CreateEditPoint

   ' Insert ten lines of text.
   For iCtr = 1 To 10
      objEditPt.Insert("This is a test." & Chr(13))
   Next iCtr
   objEditPt.StartOfDocument()
   objMovePt.EndOfDocument()
   ' Replace all occurrences of "test" with "thing."
   MsgBox("Replacing all text with a new string...")
   objEditPt.ReplaceText(objMovePt, "ALL TEXT REPLACED WITH THIS SENTENCE.", vsEPReplaceTextOptions.vsEPReplaceTextAutoformat)
End Sub
  • 直前の呼び出し元に対する完全な信頼。 このメンバーは、部分的に信頼されているコードから使用することはできません。 詳細については、「部分信頼コードからのライブラリの使用」を参照してください。
この情報は役に立ちましたか。
(残り 1500 文字)
コミュニティ コンテンツ 追加
注釈 FAQ