TextSelection.MoveToLineAndOffset, méthode

Déplace le point actif jusqu'à l'emplacement donné.

Espace de noms :  EnvDTE
Assembly :  EnvDTE (dans EnvDTE.dll)

Syntaxe

'Déclaration
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
)

Paramètres

  • Line
    Type : Int32

    Requis. Numéro de ligne à atteindre, en commençant à 1. Line peut également être l'une des constantes de vsGoToLineOptions.

  • Offset
    Type : Int32

    Requis. La position de l'index du caractère sur la ligne, en partant de un.

  • Extend
    Type : Boolean

    Optionnel. Valeur par défaut = false. Valeur booléenne permettant d'étendre la sélection en cours. Si la valeur de Extend est true, l'extrémité active de la sélection se déplace jusqu'à l'emplacement, alors que l'extrémité ancrée reste en place. Sinon, les deux extrémités sont déplacées jusqu'à l'emplacement spécifié. Cet argument s'applique uniquement à l'objet TextSelection.

Notes

Si la valeur du paramètre Offset se trouve au-delà du dernier caractère de la ligne, le document se déplace jusqu'à la fin de la ligne.

Exemples

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

Sécurité .NET Framework

Voir aussi

Référence

TextSelection Interface

EnvDTE, espace de noms