次の方法で共有


TextSelection インターフェイス

更新 : 2007 年 11 月

表示ベースの編集操作および選択したテキストへのアクセスを提供します。

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

構文

'宣言
<GuidAttribute("1FA0E135-399A-4D2C-A4FE-D21E2480F921")> _
Public Interface TextSelection
'使用
Dim instance As TextSelection
[GuidAttribute("1FA0E135-399A-4D2C-A4FE-D21E2480F921")]
public interface TextSelection
[GuidAttribute(L"1FA0E135-399A-4D2C-A4FE-D21E2480F921")]
public interface class TextSelection
public interface TextSelection

解説

TextSelection オブジェクトのプロパティとメソッドは、Visual Studio 統合開発環境 (IDE: Integrated Development Environment) のエディタ コマンドを直接反映します。環境と同様に、テキスト選択操作も、上書きモードであるか仮想空白モードであるかなど、エディタのグローバル状態の影響を受けます。

テキスト ドキュメントを変更する操作は、その操作が読み取り専用ブロックに含まれている文字に影響する場合、またはテキスト ドキュメント自体が読み取り専用である場合に失敗します。

関連付けられているドキュメントが HTML ドキュメントの場合、TextSelection オブジェクトの一部のプロパティとメソッドは失敗する場合があります。失敗の原因として、HTML ドキュメントを表示するウィンドウがソース ビューになっていないことや、テキスト ドキュメントの背後にあるデータがロックされていることが考えられます。

Sub TextSelectionExample()
   ' Before running this example, open a text document.
   Dim objSel As TextSelection = DTE.ActiveDocument.Selection
   Dim objActive As VirtualPoint = objSel.ActivePoint
   ' Collapse the selection to the beginning of the line.
   objSel.StartOfLine()
   ' objActive is "live", tied to the position of the actual selection, 
   ' so it will reflect the new position.
   Dim iCol As Long = objActive.DisplayColumn
   ' Move the selection to the end of the line.
   objSel.EndOfLine()

   MsgBox("The length of the insertion point line is " & (objActive.DisplayColumn - iCol) & " display characters.")
End Sub

参照

参照

TextSelection メンバ

EnvDTE 名前空間