Print #, instruction

  • Article

Écrit dans un fichier séquentiel des données mises en forme pour l’affichage.

Syntaxe

Imprimer#filenumber, [ outputlist ]

L’instruction Print # est composée des éléments suivants :

Élément Description
filenumber Obligatoire. Tout numéro de fichier valide.
outputlist Facultatif. Expression ou liste d'expressions à imprimer.

Paramètres

Les paramètres de l’argumentoutputlist sont les suivants :

[{ Spc(n) | Tab [ (n) ]}] [ expression ] [ charpos ]

Paramètre Description
Spc(n) Permet d’insérer des espaces dans la sortie, n étant le nombre d’espaces à insérer.
Tab(n) Permet de positionner le point d’insertion sur un numéro de colonne absolu, n étant le numéro de la colonne. Utilisez Tab sans argument pour positionner le point d’insertion au début de la zone d’impression suivante.
expression Expressions numériques ou expressions de chaîne à imprimer.
charpos Spécifie le point d'insertion du caractère suivant. Utilisez un point-virgule pour positionner le point d'insertion immédiatement après le dernier caractère affiché. Utilisez Tab(n) pour positionner le point d’insertion sur un numéro de colonne absolu. Utilisez Tab sans argument pour le positionner au début de la zone d’impression suivante. Si charpos est omis, le caractère suivant est imprimé sur la ligne suivante.

Remarques

Les données écrites avec print # sont généralement lues à partir d’un fichier avec Line Input # ou Input #.

Si vous omettez outputlist et incluez seulement un séparateur de liste après filenumber, une ligne vierge est imprimée dans le fichier.

Vous pouvez séparer plusieurs expressions par un espace ou un point-virgule. L'espace a le même effet que le point-virgule.

Pour les données booléennes , True ou False est imprimé. Les mots clés True et False ne sont pas traduits, quels que soient les paramètres régionaux définis.

Les données de date sont écrites dans le fichier à l’aide du format de date courte standard reconnu par votre système. Dans les cas où le composant de date ou d'heure est absent ou a la valeur zéro, seul l'élément fourni est écrit dans le fichier.

Rien n’est écrit si les données outputlist ont la valeur Empty. En revanche, si les données outputlist ont la valeur Null, Null est écrit dans le fichier.

Pour les données d’erreur , la sortie s’affiche sous forme Errorde code d’erreur. Le mot clé Error n'est pas traduit, quels que soient les paramètres régionaux définis.

Toutes les données écrites dans le fichier à l’aide du numéro d’impression sont reconnues à l’échelle internationale ; autrement dit, les données sont correctement mises en forme à l’aide du séparateur décimal approprié.

Étant donné que Print # écrit une image des données dans le fichier, vous devez délimiter les données afin qu’elles s’impriment correctement. Si vous utilisez Tab sans argument pour déplacer la position de l'impression vers la zone d'impression suivante, Print # écrit également dans le fichier les espaces entre les champs d'impression.

Remarque

Si, à un moment donné, vous souhaitez lire les données d’un fichier à l’aide de l’instruction Input # , utilisez l’instruction Write # au lieu de l’instruction Print # pour écrire les données dans le fichier. L’utilisation de Write # garantit l’intégrité de chaque champ de données distinct en le délimitant correctement, afin qu’il puisse être lu à l’aide de Input #. L’utilisation de Write # garantit également qu’il peut être lu correctement dans tous les paramètres régionaux.

Exemple

Cet exemple utilise l’instruction Print # pour écrire des données dans un fichier.

Open "TESTFILE" For Output As #1 ' Open file for output. 
Print #1, "This is a test" ' Print text to file. 
Print #1, ' Print blank line to file. 
Print #1, "Zone 1"; Tab ; "Zone 2" ' Print in two print zones. 
Print #1, "Hello" ; " " ; "World" ' Separate strings with space. 
Print #1, Spc(5) ; "5 leading spaces " ' Print five leading spaces. 
Print #1, Tab(10) ; "Hello" ' Print word at column 10. 
 
' Assign Boolean, Date, Null and Error values. 
Dim MyBool, MyDate, MyNull, MyError 
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null 
MyError = CVErr(32767) 
' True, False, Null, and Error are translated using locale settings of 
' your system. Date literals are written using standard short date 
' format. 
Print #1, MyBool ; " is a Boolean value" 
Print #1, MyDate ; " is a date" 
Print #1, MyNull ; " is a null value" 
Print #1, MyError ; " is an error value" 
Close #1 ' Close file.

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.