Fonctions Print, PrintLine
Mise à jour : novembre 2007
Écrit des données mises en forme pour l'affichage dans un fichier séquentiel.
Public Sub Print( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
' -or-
Public Sub PrintLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
Paramètres
FileNumber
Requis. Tout numéro de fichier valide.Output
Facultatif. Zéro ou plusieurs expressions séparées par des virgules à écrire dans un fichier.L'argument Output peut prendre les valeurs suivantes :
Paramètre |
Description |
|---|---|
SPC(n) |
Utilisé pour insérer des espaces dans la sortie, n indiquant le nombre d'espaces à insérer. |
TAB(n) |
Utilisé pour placer le point d'insertion sur un numéro de colonne absolu, n indiquant le numéro de 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. |
Exceptions
Type d'exception |
Numéro de l'erreur |
Condition |
|---|---|---|
Le mode de fichier est non valide. |
||
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
Les fonctions Print et PrintLine sont fournies pour une compatibilité descendante et peut avoir un impact sur les performances. 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.
Print n'inclut pas de saut de ligne à la fin d'une ligne ; cependant PrintLine inclut un saut de ligne.
Les données écrites à l'aide de Print sont généralement lues à partir d'un fichier avec LineInput ou Input.
Si l'argument Output est omis pour PrintLine, une ligne vide est imprimée dans le fichier ; pour Print, aucune sortie n'est effectuée. Plusieurs expressions séparées par une virgule seront alignées sur les limites de tabulation, mais la combinaison de virgules et de TAB peut engendrer des résultats incohérents.
Pour les données de type Boolean, les valeurs True ou False sont imprimées. Les mots clés True et False ne sont jamais traduits, quels que soient les paramètres régionaux.
Les données relatives aux dates sont écrites dans le fichier selon le format de date courte standard reconnu par votre système. Si l'un des composants date ou heure est omis ou égal à zéro, seul le composant fourni est écrit dans le fichier.
Si les données de Output sont vides, rien n'est écrit dans le fichier. Toutefois si les données de la liste Output sont de type DBNull, la valeur Null est écrite dans le fichier.
Pour les données de type Error, le résultat affiché est Error errorcode. Le mot clé Error n'est jamais traduit, quels que soient les paramètres régionaux.
Toutes les données écrites dans le fichier à l'aide de la fonction Print respectent les conventions internationales ; autrement dit, les données sont mises en forme à l'aide du séparateur décimal approprié. Si l'utilisateur souhaite extraire des données en vue d'une utilisation par plusieurs paramètres régionaux, il convient d'utiliser la fonction Write.
L'écriture sur fichier à l'aide de la fonction Print ou PrintLine requiert l'accès Write à partir de l'énumération FileIOPermissionAccess. Pour plus d'informations, consultez FileIOPermissionAccess, énumération.
Exemple
Cet exemple utilise les fonctions Print et PrintLine pour écrire des données dans un fichier.
FileOpen(1, "c:\trash.txt", OpenMode.Output) ' Open file for output.
Print(1, "This is a test.") ' Print text to file.
PrintLine(1) ' Print blank line to file.
PrintLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
PrintLine(1, "Hello", "World") ' Separate strings with a tab.
PrintLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
PrintLine(1, TAB(10), "Hello") ' Print word at column 10.
' Assign Boolean, Date, and Error values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")
' Dates and booleans are translated using locale settings of your system.
PrintLine(1, aBool, " is a Boolean value")
PrintLine(1, aDate, " is a date")
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
Tâches
Comment : insérer du texte dans des fichiers dans Visual Basic
Comment : écrire du texte dans des fichiers à l'aide de Streamwriter dans Visual Basic