FileSystem.Loc, méthode
Retourne une valeur Long qui spécifie la position en lecture/écriture actuelle dans un fichier ouvert.
Espace de noms : Microsoft.VisualBasic
Assembly : Microsoft.VisualBasic (dans microsoft.visualbasic.dll)
Syntaxe
'Déclaration
Public Shared Function Loc ( _
FileNumber As Integer _
) As Long
'Utilisation
Dim FileNumber As Integer
Dim returnValue As Long
returnValue = FileSystem.Loc(FileNumber)
public static long Loc (
int FileNumber
)
public:
static long long Loc (
int FileNumber
)
public static long Loc (
int FileNumber
)
public static function Loc (
FileNumber : int
) : long
Paramètres
- FileNumber
Obligatoire. Tout numéro de fichier Integer valide.
Valeur de retour
Retourne une valeur Long qui spécifie la position en lecture/écriture actuelle dans un fichier ouvert.
Notes
Pour plus d'informations, consultez la rubrique Visual Basic Loc, fonction.
La fonction Loc commence par zéro ; son utilisation pour obtenir le premier octet d'un fichier retournera 0.
La fonction Loc est fournie pour des raisons de compatibilité descendante et peut avoir un impact sur les performances. Pour les applications non héritées (non-legacy), l'objet My.Computer.FileSystem offre de meilleures performances. Pour plus d'informations, consultez Accès au fichier avec Visual Basic.
Les éléments suivants décrivent la valeur de retour pour chaque mode d'accès aux fichiers :
Mode |
Valeur de retour |
|---|---|
Random |
Numéro du dernier enregistrement lu ou écrit sur le fichier. |
Sequential |
Position d'octet actuelle dans le fichier divisée par 128. Cependant, les informations retournées par Loc pour les fichiers à accès séquentiel ne sont ni utilisées ni requises. |
Binary |
Position du dernier octet lu ou écrit. |
Exemple
Cet exemple utilise la fonction Loc pour retourner la position actuelle en lecture/écriture dans un fichier ouvert. Cet exemple suppose que MyFile est un fichier texte comportant quelques lignes de données.
Dim location As Long
Dim oneChar As Char
FileOpen(1, "C:\TESTFILE.TXT", OpenMode.Binary)
While location < LOF(1)
Input(1, oneChar)
location = Loc(1)
WriteLine(1, location & ControlChars.CrLf)
End While
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