|
Visual Basic 6.0 fournit un moyen simple d' ouvrir des fichiers texte et de lire leur contenu dans une zone de texte à l'écran, ainsi que d'écrire un nouveau texte dans un fichier. Seuls onze lignes de code sont nécessaires pour la première étape, et dix suffiront pour la deuxième opération. Le procédé utilise l' entrée et fonctions de sortie en Visual Basic, ainsi que d'une petite fenêtre pour recueillir des informations auprès de l'utilisateur . Choses que vous devez
Visual Basic 6.0
Voir Plus Instructions
1 Ouvrez Visual Basic 6.0, cliquez sur Fichier et choisissez Nouveau projet . Sélectionnez EXE standard dans la liste des modèles. Double- cliquez sur le contrôle de zone de texte dans la boîte à outils sur la gauche pour ajouter ceci à la forme . Modifier la hauteur de la forme dans le volet Propriétés sur le droit à 5000
2 apporter les modifications suivantes aux propriétés de zone de texte: . Hauteur = 3000Multiline = TrueScrollbars = BothWidth = 3000
Hôtels 3 Double- cliquez sur le contrôle Button dans la Boîte à outils . Modifier la propriété Caption de lire le fichier . Répétez cette opération pour ajouter un deuxième contrôle Button , en changeant la propriété Caption ici pour écrire le fichier .
4 Double- cliquez sur le bouton Lire un fichier pour ouvrir la fenêtre de code. Entrez ce code sur la page de visualisation de code : Function ReadFile () de ReadFileName As StringReadFile = InputBox (" Entrez le nom du fichier à lire :") Ouvert ReadFile Pour l'entrée Comme # 1ReadFile = Entrée $ ( LOF (1) , 1) Text1 . Text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click () ReadFileEnd Sous
5 Double- cliquez sur le bouton écrire dans un fichier pour ouvrir la fenêtre de code. Entrez ce code: WriteFile de fonction ( ) WriteFileName As StringWriteFileName = InputBox (" Entrez le nom du fichier " ) Ouvert WriteFileName pour la production que 2Print # # 2, # Text1.TextClose 1End FunctionPrivate Sous Command2_Click () WriteFileEnd Sous
6 Exécutez le programme en appuyant sur F5 et cliquez sur la commande de lecture du fichier en premier. Entrez le nom d'un fichier texte connu , y compris le suffixe txt . . Le fichier devrait apparaître dans la zone de texte . Si vous cliquez maintenant sur écriture de fichier et fournissez un nom différent, vous devrez créer un nouveau fichier , mais en double . Alternativement , si vous supprimez le texte ou cliquez simplement sur Lire un fichier avant de charger un fichier et tapez quelque chose de nouveau , vous pouvez créer un tout nouveau fichier .
|
