Partager via


FileSystem.Seek, méthode (Int32)

Retourne une valeur de type Long spécifiant la position de lecture/écriture actuelle dans un fichier ouvert à l'aide de la fonction FileOpen ou définit la position de la prochaine opération de lecture/écriture dans un fichier ouvert à l'aide de la fonction FileOpen. La fonctionnalité My permet une meilleure productivité et de meilleures performances dans les opérations d'E/S de fichier que Seek. Pour plus d'informations, consultez My.Computer.FileSystem, objet.

Espace de noms : Microsoft.VisualBasic
Assembly : Microsoft.VisualBasic (dans microsoft.visualbasic.dll)

Syntaxe

'Déclaration
Public Shared Function Seek ( _
    FileNumber As Integer _
) As Long
'Utilisation
Dim FileNumber As Integer
Dim returnValue As Long

returnValue = FileSystem.Seek(FileNumber)
public static long Seek (
    int FileNumber
)
public:
static long long Seek (
    int FileNumber
)
public static long Seek (
    int FileNumber
)
public static function Seek (
    FileNumber : int
) : long

Paramètres

  • FileNumber
    Obligatoire. Un Integer qui contient un numéro de fichier valide.

Valeur de retour

Retourne une valeur de type Long spécifiant la position de lecture/écriture actuelle dans un fichier ouvert à l'aide de la fonction FileOpen ou définit la position de la prochaine opération de lecture/écriture dans un fichier ouvert à l'aide de la fonction FileOpen. La fonctionnalité My permet une meilleure productivité et de meilleures performances dans les opérations d'E/S de fichier que Seek. Pour plus d'informations, consultez My.Computer.FileSystem, objet.

Notes

Pour plus d'informations, consultez la rubrique Visual Basic Seek, fonction.

Seek retourne une valeur comprise entre 1 et 2 147 483 647 (équivalent à 2^31 - 1) inclus.

Les éléments suivants décrivent les valeurs de retour pour chaque mode d'accès aux fichiers :

Mode

Valeur de retour

Random

Numéro de l'enregistrement suivant lu ou écrit

Binary, Input, Output, Append

Position d'octet à laquelle l'opération suivante a lieu. Le premier octet d'un fichier se trouve à la position 1, le deuxième octet à la position 2, et ainsi de suite.

Exemple

Cet exemple utilise la fonction Seek pour retourner la position actuelle dans le fichier. L'exemple suppose que TestFile est un fichier contenant les enregistrements de la structure Record.

Structure Record   ' Define user-defined type.
   Dim ID As Integer
   Dim Name As String
End Structure

Pour les fichiers ouverts en mode Random, Seek retourne le numéro d'enregistrement suivant.

FileOpen(1, "TESTFILE", OpenMode.Random)
Do While Not EOF(1)   
   WriteLine(1,Seek(1))   ' Write record number.
   FileGet(1, MyRecord, -1)   ' Read next record.
Loop
FileClose(1)

Pour les fichiers ouverts dans des modes autres que le mode Random, Seek retourne la position d'octet à laquelle l'opération suivante a lieu. Supposez que TestFile est un fichier qui contient quelques lignes de texte.

' Report character position at beginning of each line.
Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input)   ' Open file for reading.
While Not EOF(1)   
' Read next line.
   TextLine = LineInput(1)
   ' Position of next line.
   MsgBox(Seek(1))
End While
FileClose(1)

Cet exemple utilise la fonction Seek pour définir la position de la lecture ou de l'écriture suivante dans un fichier. Cet exemple suppose que People.txt est un fichier contenant les enregistrements de la structure Record.

Structure TestRecord
   Dim Name As String
   Dim ID As Integer
End Structure

Pour les fichiers ouverts dans des modes autres que le mode Random, Seek définit la position d'octet à laquelle l'opération suivante a lieu. Supposez que TestFile est un fichier qui contient quelques lignes de texte.

Dim someText As String = "This is a test string."
' Open file for output.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Move to the third character.
Seek(1, 3)
Input(1, someText)
Console.WriteLine(someText)
FileClose(1)

Plates-formes

Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Édition Media Center, Windows XP Professionnel Édition x64, Windows XP SP2, Windows XP Starter Edition

Le .NET Framework ne prend pas en charge toutes les versions de chaque plate-forme. Pour obtenir la liste des versions prises en charge, consultez Configuration requise.

Informations de version

.NET Framework

Prise en charge dans : 2.0, 1.1, 1.0

Voir aussi

Référence

FileSystem, classe
Membres FileSystem
Microsoft.VisualBasic, espace de noms
IOException Class

Autres ressources

Seek, fonction
FileGet, fonction
Loc, fonction
FileOpen, fonction
FilePut, fonction
Lecture à partir de fichiers en Visual Basic
Écriture dans des fichiers en Visual Basic