通过

VirtualPoint 接口

  • 项目

更新：2007 年 11 月

使您得以操作文本文档的右边距（双向 Windows 中的左边距）以外的文本。

命名空间：  EnvDTE
程序集：  EnvDTE（在 EnvDTE.dll 中）

语法

声明
<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")> _
Public Interface VirtualPoint _
    Implements TextPoint
用法
Dim instance As VirtualPoint

[GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface VirtualPoint : TextPoint

[GuidAttribute(L"42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface class VirtualPoint : TextPoint

public interface VirtualPoint extends TextPoint

备注

VirtualPoint 对象与 TextPoint 对象相似，但前者可以查询文档中的虚空格。TextSelection.StartPoint 和 TextSelection.EndPoint 返回 VirtualPoint 对象。

虚空格是现有文本行右边的空白，虚拟点即存在于该区域中。

示例

Sub VirtualPointExample()
   ' 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.")
   MsgBox("VirtualCharOffset value: " & objActive.VirtualCharOffset & vbCr & "VirtualDisplayColumn value: " & objActive.VirtualDisplayColumn)
End Sub

另请参见

参考

VirtualPoint 成员

EnvDTE 命名空间