TextSelection.MoveToLineAndOffset-Methode

Verschiebt den aktiven Punkt an die angegebene Position.

Namespace:  EnvDTE
Assembly:  EnvDTE (in EnvDTE.dll)

Syntax

'Declaration
Sub MoveToLineAndOffset ( _
    Line As Integer, _
    Offset As Integer, _
    Extend As Boolean _
)
void MoveToLineAndOffset(
    int Line,
    int Offset,
    bool Extend
)
void MoveToLineAndOffset(
    [InAttribute] int Line, 
    [InAttribute] int Offset, 
    [InAttribute] bool Extend
)
abstract MoveToLineAndOffset : 
        Line:int * 
        Offset:int * 
        Extend:bool -> unit
function MoveToLineAndOffset(
    Line : int, 
    Offset : int, 
    Extend : boolean
)

Parameter

  • Line
    Typ: Int32

    Erforderlich. Die bei 1 beginnende Zeilennummer, in die der aktive Punkt verschoben werden soll. Line kann außerdem eine der Konstanten aus vsGoToLineOptions sein.

  • Offset
    Typ: Int32

    Erforderlich. Die Zeichenindexposition in der Zeile, beginnend bei 1.

  • Extend
    Typ: Boolean

    Optional. Standard = false. Ein boolescher Wert zum Erweitern der aktuellen Auswahl. Wenn Extend den Wert true hat, wird das aktive Ende der Markierung an die Position verschoben, während das verankerte Ende seine Position beibehält. Andernfalls werden beide Enden an die angegebene Position verschoben. Dieses Argument gilt ausschließlich für das TextSelection-Objekt.

Hinweise

Wenn der Wert von Offset über das letzte Zeichen der Zeile hinausgeht, wird das Dokument an das Ende der Zeile verschoben.

Beispiele

Sub MoveToLineAndOffsetExample()
    ' Before running this example, open a text document.
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection

    ' Move to the beginning of the document so we can iterate over the 
    ' whole thing.
    objSel.StartOfDocument()
    While objSel.FindPattern("#if _DEBUG")
        ' If we found the beginning of a debug-only section, save the 
        ' position.
        Dim lStartLine As Long = objSel.TopPoint.Line
        Dim lStartColumn As Long = objSel.TopPoint.LineCharOffset

        ' Look for the end.
        If objSel.FindPattern("#endif") Then
            ' Select the entire section and outline it.
            objSel.SwapAnchor()
            objSel.MoveToLineAndOffset(lStartLine, lStartColumn, True)
            objSel.OutlineSection()
            objSel.LineDown()
        End If
    End While
End Sub

.NET Framework-Sicherheit

Siehe auch

Referenz

TextSelection Schnittstelle

EnvDTE-Namespace