FileClose, fonction

Mise à jour : novembre 2007

Termine les opérations d'entrée/sortie (E/S) dans un fichier ouvert à l'aide de la fonction FileOpen.

L'utilisation de My permet une meilleure productivité et de meilleures performances dans les opérations d'E/S sur fichier. Pour plus d'informations, consultez My.Computer.FileSystem, objet.

Public Sub FileClose(ParamArray FileNumbers() As Integer)

Paramètres

  • FileNumbers
    Facultatif. Tableau de paramètres de 0 canaux ou plus à fermer.

Exceptions

Type d'exception

Numéro de l'erreur

Condition

IOException

52

FileNumber n'existe pas.

Consultez la colonne « Numéro d'erreur » si vous mettez à niveau des applications Visual Basic 6.0 qui utilisent la gestion non structurée des erreurs. (Vous pouvez comparer le numéro d'erreur par rapport à Number, propriété (objet Err).) Toutefois, lorsque cela est possible, vous devez envisager de remplacer un tel contrôle d'erreurs par Vue d'ensemble de la gestion structurée des exceptions pour Visual Basic.

Notes

La fonction FileClose est fournie pour la compatibilité descendante et peut affecter la performance. Pour les applications non héritées (legacy), l'objet My.Computer.FileSystem offre de meilleures performances. Pour plus d'informations, consultez Accès au fichier avec Visual Basic.

Si l'argument FileNumbers est omis, tous les fichiers actifs ouverts à l'aide de la fonction FileOpen sont fermés.

Lorsque vous fermez un fichier ouvert en mode Output ou Append, la mémoire tampon finale de sortie est écrite dans la mémoire tampon du système d'exploitation associée à ce fichier. La totalité de l'espace dans la mémoire tampon associée au fichier fermé est libérée.

Lorsque la fonction FileClose est exécutée, l'association d'un fichier avec son numéro de fichier est désactivée.

Exemple

Cet exemple utilise la fonction FileClose pour fermer un fichier ouvert dans le cadre de la fonction Input.

Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input)   ' Open file.
Do While Not EOF(1)   ' Loop until end of file.
   TextLine = LineInput(1)   ' Read line into variable.
   MsgBox(TextLine)   ' Display the line
Loop
FileClose(1)   ' Close file.

Notes du développeur sur Smart Device

Cette fonction n'est pas prise en charge.

Configuration requise

Espace de noms :Microsoft.VisualBasic

**Module :**FileSystem

**Assembly :**bibliothèque Visual Basic Runtime (dans Microsoft.VisualBasic.dll)

Voir aussi

Référence

End, instruction

FileOpen, fonction

Reset, fonction

Stop, instruction (Visual Basic)

Autres ressources

Accès au fichier avec Visual Basic