8. SAUVEGARDE ET LECTURE DES INFORMATIONS
Afin qu'une fois le programme terminé, toutes les données créées en mémoire ne soient pas perdues, vous devez être en mesure d'enregistrer des informations sur votre disque dur. Sinon, toutes les informations disparaîtront sans laisser de trace. Vous pouvez enregistrer et lire les données de différentes manières. Les fichiers binaires et texte peuvent être utilisés pour travailler avec des informations de différentes tailles et formats. Vous pouvez utiliser le registre Windows pour stocker de petites quantités d'informations. Et pour les tâches les plus complexes, il est judicieux d'utiliser des bases de données.
8.1. Ouverture de fichiers à l’aide de l’opérateur "Ouvert "
Fichier - une zone nommée de tout périphérique de stockage externe. Les données résident dans la mémoire de l'ordinateur et les fichiers sur le disque dur. Le programme ne fonctionne pas directement avec les fichiers, mais utilise le système d'exploitation comme intermédiaire.
Il existe deux types de noms de fichiers: complet - en plus du nom de fichier, l'emplacement du fichier sur un support externe est également indiqué (par exemple, "C: \\ Program Files \\ Microsoft Visual Studio \\ VB98 \\ VB 6.EXE") et court - uniquement le nom de fichier (VB 6.EXE ). Si l'emplacement du fichier n'est pas spécifié, il sera recherché dans le dossier actuel, par défaut - le dossier où se trouve votre application. Le nom de fichier direct se compose de deux parties: le nom de fichier unique réel et son extension. Le nom lui-même identifie le fichier et l'extension indique généralement le format du fichier ou le programme par lequel il a été créé.
Avant de commencer à travailler avec le fichier, vous devez demander au système d'exploitation aiguille (descripteur) fichier... Pour l'obtenir, utilisez la fonction "FreeFile". Ensuite, à l'aide de l'instruction "Open", ce pointeur est associé au fichier requis. Ce n'est qu'alors que le programme pourra travailler avec. La syntaxe pour ouvrir un fichier est la suivante:
'Obtenez un pointeur de fichier gratuit et affectez-le à une variable
FileHandle% \u003d FreeFile
'Ouvrez le fichier
Ouvrez FilePath _
En tant que [#] FileHandle%
... (travailler avec un fichier)
Fermer [#] FileHandle
· FileHandle% - une variable qui stocke le pointeur de fichier;
· FreeFile - le nom de la fonction qui renvoie un pointeur de fichier;
· Open - nom de l'opérateur;
· FilePath est le nom complet du fichier;
· For - un mot-clé suivi d'une description du mode d'accès aux fichiers;
· Mode - mode d'accès aux fichiers (voir le tableau 15);
Tableau 15
Modes d'accès aux fichiers
|
Modes d'accès |
La description |
|
Ajouter |
Ajoutez des données à la fin d'un fichier texte existant. Si le fichier n'existe pas, il sera créé |
|
Binaire |
Ouverture d'un fichier en mode binaire, c'est-à-dire comme un ensemble d'octets. Si le fichier n'existe pas mais sera créé |
|
Contribution |
Ouverture d'un fichier pour lecture au format texte |
|
Production |
Ouverture d'un fichier pour écrire un fichier texte. Cela supprimera toutes les anciennes informations. Si le fichier n'existe pas mais sera créé |
|
Aléatoire |
Ouverture d'un fichier en mode d'accès aléatoire. Ce mode est utilisé pour travailler avec des enregistrements simples. Si le fichier n'existe pas mais sera créé |
· L'accès est un mot-clé facultatif suivi d'une description du type d'accès;
· AccessType - description du type d'accès:
· Lire - lire;
· Ecrire - écrire;
· Lecture Écriture - lecture et écriture.
|
Remarque |
Pour les modes d'accès Append et Output, seul le type d'accès Write est disponible, pour Input, only Read, et pour Binary et Random, les trois types d'accès sont disponibles. |
· LockType est un paramètre facultatif qui détermine si d'autres programmes peuvent utiliser ce fichier pendant que votre programme y travaille. Il est généralement associé à la mise en réseau (voir le tableau 16).
Tableau 16
Valeurs possibles pour le paramètre LockType
|
Valeur |
La description |
|
partagé |
Tous les utilisateurs disposant des droits nécessaires auront un accès complet au fichier |
|
Verrouiller la lecture |
La lecture du fichier est bloquée, mais l'écriture est autorisée |
|
Verrouiller l'écriture |
L'écriture dans le fichier est bloquée, mais la lecture est autorisée |
|
Verrouiller lecture écriture |
La lecture et l'écriture sont interdites |
· Comme c'est un mot-clé suivi d'un pointeur de fichier.
· # Est un caractère indiquant que la valeur qui le suit est un pointeur de fichier.
· Len est un mot-clé facultatif, suivi d'un paramètre spécifiant la longueur de l'enregistrement.
· CharInBuffer% - longueur d'enregistrement pour un fichier ouvert en mode d'accès aléatoire (aléatoire).
· Close est l'instruction qui ferme le fichier associé au descripteur spécifié.
Il est important de fermer le fichier une fois que vous avez fini de l'utiliser. L'instruction "Close" libère le pointeur de fichier et la zone mémoire associée.
Lorsque vous travaillez avec un fichier, à savoir lors de sa lecture, il est très important de déterminer la fin du fichier. Il peut être déterminé à l'aide de la fonction EOF (End Of File):
EOF (FileHandle)
· EOF - nom de la fonction;
· FileHandle est le descripteur de fichier pour spécifier la fin de.
La fonction renvoie True si la fin du fichier a été atteinte; sinon, elle renvoie False.
8.2. Lire et écrire dans un fichier texte
Le fichier texte est ouvert en mode d'accès "Entrée", "Sortie" ou "Ajouter" (voir Tableau 15). La particularité de ce mode est qu'il ne fonctionne qu'avec des caractères imprimables spécifiques. Il est inutile de travailler avec des symboles de service.
Pour écrire des informations, utilisez deux opérateurs "Imprimer" et "Ecrire", dont la syntaxe est la suivante:
Imprimer # FileHandle%, VarBuffer [;]
Ecrire # FileHandle%, VarBuffer [;]
· Imprimer / écrire - mots-clés d'opérateur.
· # FileHandle% - pointeur vers le fichier dans lequel les informations seront placées.
· VarBuffer est la valeur qui sera écrite dans le fichier.
· ; - un paramètre optionnel utilisé lors de l'écriture dans un fichier texte, signifie que la valeur suivante sera écrite sur la même ligne, et si elle est absente, sur la suivante.
Pour lire les informations d'un fichier, utilisez les opérateurs "Entrée" et "Entrée ligne". La syntaxe est similaire les unes aux autres:
Entrée ligne # FileHandle%, VarBuffer
Entrée # FileHandle%, VarBuffer
· Entrée / Entrée de ligne - mots clés d'opérateur.
· # FileHandle% - pointeur de fichier à partir duquel les informations seront lues.
· VarBuffer est une variable dans laquelle les informations seront lues.
La différence entre les opérateurs "Entrée de ligne" et "Entrée" est que le premier est destiné uniquement aux fichiers texte, et le second - pour tout. Dans le cas des fichiers texte, «Entrée» lit les données sur une ligne jusqu'au premier séparateur (pour les données texte, le séparateur est «,» (virgule), et pour les données numériques, «» (espace) et «,») et «Entrée ligne »Lit la ligne entière à la fois, en ignorant les délimiteurs.
|
Remarque |
Visual Basic n'a aucun contrôle de format pour les fichiers précédemment générés. Par conséquent, le caractère «2» peut être lu comme le nombre correspondant et vice versa. |
8.3. Travailler avec des fichiers binaires
Fichiers ouverts dans format binaire par l'opérateur "Ouvrir" en mode "Binaire". Une caractéristique distinctive de ce mode est que le travail avec un fichier se concentre exclusivement sur des octets spécifiques. Étant donné que Visual Basic peut adresser directement à l'emplacement souhaité dans le fichier, ce mode est également appelé - mode d'accès direct... Une autre caractéristique de ce mode est la possibilité d'écrire et de lire simultanément des informations dans différentes parties du fichier sans le rouvrir. L'écriture dans un fichier ouvert en mode binaire se fait en utilisant la syntaxe suivante:
Mettre # FileHandle% ,, NameVar
· Mettez - le nom de l'opérateur d'enregistrement des informations.
· RecNumber - numéro d'octet du fichier dans lequel les informations seront écrites (facultatif).
· NameVar est une variable dont le contenu sera écrit dans un fichier.
La lecture des informations d'un fichier en mode binaire est effectuée à l'aide de l'opérateur suivant:
Obtenir # FileHandle% ,, NameVar
· Get - le nom de l'opérateur d'enregistrement des informations.
· FileHandle% - pointeur de fichier.
· RecNumber - numéro d'octet du fichier à partir duquel les informations seront lues (facultatif).
· NameVar - le nom de la variable dans laquelle les informations de lecture seront placées.
Puisque le mode binaire est axé sur les octets d'informations, lors de la lecture à partir d'un fichier, la variable buffer doit avoir un type strictement défini: soit "Byte", alors la valeur numérique de l'octet sera lue, soit la valeur de caractère d'une longueur fixe en un caractère, alors l'octet sera lu comme un caractère, ANSI , dont le code correspond à la taille de l'octet. Ce symbole peut même être un symbole de contrôle, ce qui ne peut pas être réalisé dans le cas de fichiers texte.
|
Remarque |
Si le paramètre "RecNumber" est absent, les informations seront écrites ou lues dans l'octet suivant du fichier après celui avec lequel ils ont travaillé auparavant.
8.4. Manipulation graphique
Les images graphiques peuvent également être enregistrées et extraites de fichiers. Pour récupérer une icône à partir d'un bitmap ou d'un fichier et l'assigner à la propriété Picture des contrôles PictureBox et Image, utilisez la fonction LoadPicture () avec la syntaxe suivante:
ImageCtrl.Picture \u003d LoadPicture (chemin de fichier)
· ImageCtrl - le nom du contrôle de fenêtre d'image, du contrôle d'image ou du formulaire;
· LoadPicture est le nom de la fonction;
· FilePath est le nom complet du fichier.
SavePicture ImageCtrl .Picture, FilePath
· SavePicture - nom de l'opérateur;
· ImageCtrl est le nom du contrôle de fenêtre d'image, du contrôle d'image ou du formulaire;
· Image - le nom de la propriété d'objet responsable de l'image;
· FilePath est le nom et l'emplacement complets du fichier sur le disque.
8.5. Travailler avec des données dans le registre
Vous pouvez utiliser le registre Windows pour stocker de petits morceaux d'informations sur le format des caractères. Il existe quatre procédures dans Visual Basic que vous pouvez utiliser pour y accéder. Ils sont très faciles à utiliser, mais ils présentent un inconvénient majeur: vous ne pouvez accéder aux données qu'à partir d'une clé de registre spécifique: "MyComputer \\ HKEY _CURRENT _USER \\ Software \\ VB and VBA Program Settings". Pour accéder à d'autres clés de registre, vous devez utiliser les fonctions spéciales de "Win 32 API".
Pour obtenir la valeur d'un paramètre à partir d'une clé Visual Basic dans le registre Windows, utilisez la fonction suivante:
MyString \u003d GetSetting (VBKeyName, Section, Key [, Default])
· MyString - une chaîne pour stocker la valeur retournée par la fonction;
· GetSetting est le nom de la fonction.
· VBKeyName est une valeur de chaîne qui est le nom d'une sous-clé VB / VBA interne.
· Key est une valeur de chaîne qui représente le nom du paramètre dans la section.
· La valeur par défaut est un argument optionnel dont la valeur sera renvoyée en cas d'erreur (absence de paramètre).
L'instruction suivante est utilisée pour stocker une valeur dans le registre Windows:
SaveSetting VBKeyName, Section, Clé, MyString
· SaveSetting - nom de l'opérateur.
· MyString est une variable de chaîne dans laquelle la valeur trouvée sera placée.
Pour obtenir un tableau du registre contenant toutes les valeurs de paramètres d'une sous-clé spécifique, utilisez la fonction suivante:
MyVariant \u003d SetAllSettings (VBKeyName, Section)
· MyVariant est un tableau de valeurs "Variant" renvoyées par la fonction.
· SetAllSettings est le nom de la fonction.
· Section - Une valeur de chaîne représentant une section ou une sous-section d'une application spécifique.
Pour supprimer une section de paramètre entière, utilisez une instruction avec la syntaxe suivante:
DeleteSetting VBKeyName, Section, Clé
· DeleteSetting - nom de l'opérateur.
Questions de test pour l'auto-test
- Comment certaines informations peuvent-elles être stockées pendant une longue période?
- Qu'est-ce qu'un fichier?
- Quels noms de fichiers connaissez-vous?
- Donnez la syntaxe de l'instruction "Open". Expliquez le but de ses paramètres.
- Comment plusieurs applications peuvent-elles partager le même fichier en même temps?
- Comment déterminer que les informations du fichier ont été épuisées?
- Pourquoi est-il recommandé de le fermer après avoir travaillé avec un fichier?
- Comment voyez-vous la différence entre les modes texte et fichier binaire?
- Comment les données sont-elles lues et écrites en mode fichier texte?
- Comment les données sont-elles lues et écrites en mode fichier binaire?
- Quelle est la différence entre les opérateurs "Imprimer" et "Ecrire" lorsque vous travaillez avec des fichiers?
- Quelle est la différence entre les opérateurs "Entrée" et "Entrée ligne" lorsque vous travaillez avec des fichiers?
- Comment pouvez-vous travailler avec des données graphiques?
- Quels sont les principes de base de l'utilisation du registre Windows?
Objectif: Apprentissage et utilisation des opérateurs de fichiers VB 6 différents types: fichiers séquentiels (texte), fichiers à accès aléatoire, fichiers binaires. Recherche et utilisation de l'outil CommunDialogue pour ouvrir et enregistrer des fichiers, sélectionner une police et une couleur et utiliser l'objet Presse-papierspour stocker des fragments de texte - en utilisant l'exemple de la création d'un simple éditeur de texte.
Questions de test:
1. De quelles manières pouvez-vous ouvrir un fichier texte? Comment fermer du texte et tout autre fichier ouvert?
2. Comment les données écrites dans un fichier texte sont-elles ouvertes pour l'écriture? Quelle est la différence entre les instructions Write et Print?
3. Comment les données sont-elles lues à partir d'un fichier texte ouvert en lecture? En quoi les instructions Input et Line Input diffèrent-elles les unes des autres? Quelle fonction peut être utilisée pour lire un nombre donné de caractères dans un fichier? Comment puis-je lire tous les caractères d'un fichier?
4. Qu'est-ce que type personnalisé données et comment ce concept est utilisé lorsque vous travaillez avec des fichiers à accès aléatoire ( raf)?
5. avec quels opérateurs du fichier raf les enregistrements sont lus dans un fichier rafde nouveaux enregistrements sont en cours d'écriture?
Dans quel but l'index est-il déterminé et utilisé lorsque vous travaillez avec un fichier raf?
7. Quelles sont les particularités de l'utilisation de fichiers binaires? Comment s'ouvrent-ils? Comment se fait la lecture à partir d'un fichier binaire et l'écriture dans un fichier binaire?
8. Comment le contrôle peut-il être appliqué CommunDialogue charger le contenu d'un fichier texte dans une zone de texte? Comment puis-je enregistrer le texte modifié dans un fichier texte en utilisant le même contrôle?
9. Comment le contrôle peut être appliqué CommunDialogue pour télécharger le contenu du fichier rtf sur le terrain RichesZone de texte? Comment enregistrer du texte modifié dans un fichier à l'aide du même contrôle rtf?
10. Comment le contrôle peut être appliqué CommunDialogue pour changer les valeurs des paramètres de police et pour changer la couleur du texte dans la fenêtre Zone de texte (ou un morceau de texte sélectionné dans une fenêtre RichesZone de texte)?
Exemple 7.1. Prenons l'exemple d'une application qui démontre l'écriture dans un fichier texte (et la lecture à partir d'un fichier texte) «informations sur les employés» - lignes, chacune contenant un numéro d'identification, le nom complet, la date de naissance et le lieu de naissance d'un employé. Les lignes forment un tableau, qui à l'écran simulera 4 contrôles Combo Box (Fig. 7.1), formant un tableau d'objets Comb (i), dont la propriété Style a une valeur de 1 - SimpleCombo.
Mettez en surbrillance la ligne à supprimer ", vbExclamation
Peigne (j) .RemoveItem i
«Insérer un nouvel enregistrement dans le tableau:
Private Sub mnuInsert_Click ()
i% \u003d Comb (0) .ListIndex
Si je< 0 Then
MsgBox "Sélectionnez la ligne à insérer avant", vbExclamation
Comb (0) .AddItem InputBox ("Enter number"), i
Comb (1) .AddItem InputBox ("Entrer le nom"), i
Comb (2) .AddItem InputBox ("Entrez la date de naissance."), I
Comb (3) .AddItem InputBox ("Entrez le lieu de naissance."), I
«Modifiez l’entrée dans le tableau:
Sous privé mnuUpdate_Click ()
i% \u003d Comb (0) .ListIndex
Si je< 0 Then
MsgBox "Sélectionnez la ligne à modifier", vbExclamation
Comb (0) .List (i) \u003d InputBox ("Enter number", Comb (0) .List (i))
Comb (1) .List (i) \u003d InputBox ("Entrez votre nom", Comb (1) .List (i))
Comb (2) .List (i) \u003d InputBox ("Entrez votre date de naissance", Comb (2) .List (i))
Comb (3) .List (i) \u003d InputBox ("Entrez le lieu de naissance", Comb (3) .List (i))
«Effacement de l’ensemble du tableau:
Sous privé mnuClear_Click ()
'Remplir le tableau avec les informations d'un fichier texte:
Sous privé mnuLoad_Click ()
Ouvrez "person. Txt" pour l'entrée en tant que # 1
Entrée # 1, numb, fio, bdate, bloc
Comb (0) .AddItem numb
Peigne (1) .AddItem fio
Peigne (2) .AddItem bdate
Peigne (3) .Bloc AddItem
«Ecrire des informations de table dans un fichier texte:
Sous privé mnuSave_Click ()
N% \u003d Comb (0) .ListCount
Ouvrez "person. Txt" pour la sortie en tant que # 1
Pour i \u003d 0 à N - 1
numb \u003d Val (Comb (0) .List (i))
fio \u003d Comb (1) .Liste (i)
bdate \u003d CDate (Comb (2) .List (i))
bloc \u003d Comb (3) .Liste (i)
Écrivez # 1, numb, fio, bdate, bloc
«Arrêt de l’application:
Private Sub mnuExit_Click ()
Exemple 7.2 ... Considérez une application qui démontre l'utilisation des contrôles CommunDialogue pour ouvrir et enregistrer un fichier, pour sélectionner une police et une couleur et pour modifier du texte.
Fichier de format SMS sera chargé dans la zone de texte (zone de gauche dans la figure 7.2), et le fichier de format RTF - sur le terrain RichesZone de texte (marge de droite sur la Fig. 7.2).
objet
Classe
objet
Propriété
objet
Valeur de la propriété
«Panels of general
dialogue "
Onglet Ouvrir / Enregistrer sous
Onglet Police
Onglet Couleur
Le tableau n'affiche pas les propriétés des commandes de menu Police de caractère, Couleur et Éditer... Voici le code de procédure également pour les commandes de menu uniquement Fichier (Ouvert, sauver et sauverComme). L'écriture de code pour d'autres commandes de menu est le sujet de la deuxième tâche de ce travail.
Private Sub mnuOpen_Click ()
CommonDialog1.ShowOpen
F $ \u003d CommonDialog1.FileName
Si droite (F, 3) \u003d "rtf" alors
RichTextBox1.LoadFile F
ElseIf Right (F, 3) \u003d "txt" Then
Ouvrir F pour l'entrée comme # 1
S $ \u003d Entrée (N, 1)
Sous privé mnuSave_Click ()
CommonDialog1.ShowSave
F $ \u003d CommonDialog1.FileName
Sous privé mnuSaveAs_Click ()
CommonDialog1.ShowSave
F $ \u003d CommonDialog1.FileName
RichTextBox1.SaveFile F, rtfRTF
Au cours de ce travail, l'étudiant doit effectuer 2 tâches.
Exercice 1. Au cours du processus de réalisation du devoir, les étudiants maîtrisent les capacités de travailler avec des fichiers à accès aléatoire ( RAF -aléatoireaccèsfichier).
Pour une table de base de données donnée, vous déclarez un type de données personnalisé, déclarez une variable de ce type (tutoriel, p. 108 - 112), créez et déboguez des procédures qui utilisent une variable de type personnalisé.
En particulier, des procédures pour les commandes de menu sont implémentées Écrire dans un fichierRAF et Lire à partir d'un fichierRAF... Comme dans l'exemple 7.1, un tableau d'objets est utilisé pour éditer les données. ComboBoîte et menu Éditer avec cinq commandes de sous-menu: Ajouter une note, Supprimer l'entrée, Insérer un enregistrement, Modifier l'enregistrement, Effacer le tableau.
Option 1.
Déclarez un type de données personnalisé pour la table "Voiture" (Tableau 7.1) de la base de données "Autoservice".
|
voiture |
voiture |
dysfonctionnements |
La dernière ligne du tableau 7.1 montre les types de champs.
Option 2.
Déclarez un type de données personnalisé pour la table "Pannes" (Tableau 7.2) de la base de données "Autoservice".
|
dysfonctionnements | Nom dysfonctionnements | Le coût |
La dernière ligne du tableau 7.2 contient les types de champs.
En utilisant l'exemple d'application 7.1 comme exemple, organisez la saisie et l'édition des données pour le tableau présenté, écrivez ces données dans un fichier à accès aléatoire et lisez les données à partir d'un fichier à accès aléatoire. Comme dans l'exemple 7.1, ces actions sont implémentées comme le fonctionnement des commandes de menu illustrées à la Fig. 7.1.
Tâche 2. Au cours du devoir, les étudiants complètent l'application de l'exemple 2 avec de nouvelles fonctionnalités qui nous permettent de considérer cette application comme un simple éditeur de texte.
Option 1 CommunDialogue implémenter les commandes du menu Police de caractère et Couleur (avec sous-menu Couleur des caractères et Couleur de l'arrière plan). À l'aide de ces commandes, le choix de la police (son nom, son style et sa taille) pour le fragment de texte sélectionné dans la fenêtre doit être fourni RichesZone de texte, ainsi que le choix de la couleur des symboles de la sélection et le choix de la couleur de fond de toute cette fenêtre.
Remarque: Lors de la configuration d'un objet CommunDialogue pour sélectionner une police à l'aide de la propriété (Personnalisée), veillez à définir la valeur de la propriété Flags sur 1, 2 ou 3 (voir le didacticiel, p. 183).
Option 2... Utilisation du contrôle CommunDialogue implémenter les commandes du menu Éditer (sous-menu Copie, Couper et Pâte), dont le but est copier ou effacement dans le presse-papiers du fragment de texte sélectionné, et insérer à l'endroit en surbrillance dans le texte du contenu du presse-papiers.
Remarque: Vers le presse-papiers (objet Presse-papiers) vous pouvez utiliser les méthodes SetText et GetText:
Presse-papiers. SetText RichTextBox1.SelText
RichTextBox1.SelText \u003d Presse-papiers. GetText
Chaque programme doit enregistrer les données sur le disque et les lire à partir du disque. Cela est nécessaire, par exemple, pour enregistrer les paramètres du programme, il est peu probable que l'utilisateur aime le programme, qui devra être configuré à nouveau au prochain démarrage.
Cet article se concentrera sur l'utilisation de fichiers texte visuel De base.
Descripteur de fichier
Pour travailler avec des fichiers système opérateur utilise des canaux E / S, c'est-à-dire chaque fichier ouvert a son propre numéro.
Visual Basic a une fonction FreeFile, qui renvoie le numéro d'un canal gratuit pouvant être utilisé pour travailler avec le fichier. S'il n'y a pas de chaînes gratuites, une erreur se produit.
FreeFile [(RangeNumber) ]
RangeNumber - un paramètre optionnel qui vous permet de déterminer la plage de valeurs des canaux libres, si RangeNumber \u003d 0 (par défaut), alors le numéro de canal est renvoyé dans la plage 1 à 255, et si 1, dans la plage 256 à 511.
MyFile \u003d FreeFile "La variable MyFile a reçu un canal gratuit et peut désormais être utilisée pour travailler avec des fichiers
Travailler avec des fichiers texte
Le plus souvent, vous rencontrez des fichiers texte. Les fichiers texte sont composés du jeu de caractères ASCII (American Standard Code for Information Interchange). code standard pour l'échange d'informations).
Avant de commencer à écrire / lire des données, le fichier doit être ouvert, cela se fait à l'aide de l'opérateur Ouvert (Nom de fichier) Pour As #Numéro de dossieroù:
Contribution - ouvrez le fichier en lecture, si le fichier n'existe pas, une erreur se produit;
Production - pour l'écriture, si le fichier n'existe pas, il sera créé, et si le fichier existe, il sera écrasé;
Ajouter - à ajouter, si le fichier n'existe pas, il sera créé, et si le fichier existe, les données seront ajoutées à la fin du fichier.
En train de lire fichiers texte peut se faire de deux manières: lire caractère par caractère, pour cela, utilisez la fonction Contribution (Nombre de_caractères à lire, #Numéro de dossier) et ligne par ligne, la fonction est utilisée pour cela Ligne d'entrée #Numéro de dossier, Où_lire.
Dim MyFile
Dim S comme chaîne "Variable de stockage des données lues
MyFile \u003d FreeFile
Ouvrir ("C: \\ TEST.txt") pour une entrée en tant que #MyFile
Entrée ligne #MyFile, S "Lecture de la première ligne du fichier TEST.TXT dans la variable S
Dim MyFile "Déclarez une variable pour un fichier gratuit
Dim i As Integer "Variable pour la boucle
Dim tS comme chaîne "Variable de lecture des lignes
Dim S comme chaîne "Variable de stockage des données finales
MyFile \u003d FreeFile "Attribution d'un canal gratuit pour travailler avec des fichiers
"Ouverture du fichier TEST.TXT pour lecture
Pour i \u003d 1 à 5
Entrée ligne #MyFile, tS "Lecture du fichier TEST.TXT ligne par ligne
Si i \u003d\u003e 5 Alors S \u003d tS "Si la cinquième ligne, alors nous la stockons dans la variable S
Ensuite je
Fermer #MyFile "Fermer le fichier
Dim MyFile "Déclarer une variable pour un fichier gratuit
Dim S As String "Variable de stockage des données lues
MyFile \u003d FreeFile "Attribution d'un canal gratuit pour travailler avec des fichiers
Ouvrez ("C: \\ TEST.txt") pour l'entrée sous #MyFile "Ouverture du fichier TEST.TXT pour lecture
S \u003d Entrée $ (LOG (1), 1) "Lecture du fichier entier dans la variable S
Fermer #MyFile "Fermer le fichier
Il existe des opérateurs pour écrire dans un fichier Impression #Numéro de dossier, Les données et Écrire #Numéro de dossier, Les données... La seule différence entre ces opérateurs est que Écrire écrit les données entre guillemets et Impression sans citations.
Le code suivant crée un nouveau fichier TEST.TXT sur le lecteur C: \\ et y écrit deux lignes, la première sans guillemets et la seconde entre guillemets:
Dim MyFile "Déclarez une variable pour un fichier gratuit
MyFile \u003d FreeFile "Attribution d'un canal gratuit pour travailler avec des fichiers
Ouvrir ("C: \\ TEST.txt") pour la sortie en tant que #MyFile "Ouvrez le fichier TEST.TXT pour l'enregistrement
Print #MyFile, "Cette chaîne a été écrite par l'opérateur Print, elle est sans guillemets ..."
Écrivez #MyFile, "Cette ligne a été écrite par l'instruction Write, elle est entre guillemets ..."
Fermer #MyFile "Fermer le fichier
C'est tout. Comme vous l'avez probablement déjà compris, l'opérateur est utilisé pour fermer le fichier Fermer #Numéro de dossier, dans lequel, # Numéro de dossier est facultatif.
L'article est un peu grossier, mais il sera utile pour les programmeurs novices. La prochaine fois, je parlerai de l'utilisation des binaires.
