EOF, fonction

Important :  Cet article a été traduit automatiquement, voir l’avertissement. Vous pouvez consulter la version en anglais de cet article ici.

Remarque : Si le Service Microsoft Jet Expression s’exécute en mode sandbox, qui empêche l’évaluation des expressions potentiellement dangereuses de la fonction, une méthode, un objet ou une propriété décrites dans cette rubrique est désactivée. Pour plus d’informations sur le mode sandbox, recherchez « mode sandbox » dans l’aide.

Renvoie un nombre entier contenant la valeur BooléenTrue lorsque la fin d’un fichier ouvert pour aléatoire ou séquentiel entrée a été atteinte.

Syntaxe

EOF ( filenumber )

La requis filenumberargument est un nombre entier contenant toute valide numéro de fichier.

Remarques

Utilisez la fonction EOF pour éviter de générer une erreur lorsque vous tentez d’obtenir des données au-delà de la fin d’un fichier.

La fonction EOF retourne False jusqu'à la fin du fichier. Fichiers ouverts pour un accès aléatoire ou binaire , EOF renvoie faux jusqu'à ce que la dernière instruction Get ne peut pas lire un enregistrement entier.

Fichiers ouverts pour un accès binaire , une tentative de lire le fichier à l’aide de la fonction Input jusqu'à ce que EOF renvoie la valeur True génère une erreur. Utilisez les fonctions LOF et Loc au lieu de EOF lors de la lecture de fichiers binaires avec l’entrée, ou obtenir lors de l’utilisation de la fonction EOF . Fichiers ouverts en sortie, EOF retourne toujours True.

Exemple

Remarque : Exemples suivants illustrent l’utilisation de cette fonction dans une Visual Basic pour le module d’Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de recherche et entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction EOF pour détecter la fin d’un fichier. Cet exemple suppose que MYFILE est un fichier texte comportant plusieurs lignes de texte.

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

Remarque : Avertissement traduction automatique : cet article a été traduit par un ordinateur, sans intervention humaine. Microsoft propose cette traduction automatique pour offrir aux personnes ne maîtrisant pas l’anglais l’accès au contenu relatif aux produits, services et technologies Microsoft. Comme cet article a été traduit automatiquement, il risque de contenir des erreurs de grammaire, de syntaxe ou de terminologie.

Développez vos compétences
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×