EditPoint.GetText メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

バッファ内の現在の位置と指定した位置の間にあるテキストを取得します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
Function GetText ( _
    PointOrCount As Object _
) As String
'使用
Dim instance As EditPoint
Dim PointOrCount As Object
Dim returnValue As String

returnValue = instance.GetText(PointOrCount)

string GetText(
    Object PointOrCount
)

String^ GetText(
    [InAttribute] Object^ PointOrCount
)

function GetText(
    PointOrCount : Object
) : String

パラメータ

PointOrCount
型 : System.Object

必ず指定します。TextPoint オブジェクトまたは文字数。

戻り値

型 : System.String

バッファ内の現在の位置と指定した位置の間にあるテキストの文字列。

解説

GetText は、エディットポイントと PointOrCount の間にあるテキストを表す文字列を返します。引数が整数の場合、GetText は、エディットポイントの後に続く文字列を指定した文字数分返します。各行末で暗黙的に指定された改行シーケンスも 1 文字と見なされます。

引数が負の値の場合、GetText は、エディットポイントの前にあるテキストを返します。

例

Sub GetTextExample()
   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
   objEditPt.StartOfDocument()
   msgbox("The results of GetText: " & Chr(13) & objeditpt.GetText(4))
End Sub