manipulation de fichiers est souvent un besoin commun des utilisateurs de programmes d'ordinateurs. Visual Basic 6 a quelques simples faciles à utiliser , les fonctions qui vous permettent d' ouvrir un fichier existant et ajouter de nouvelles informations à la fin de celui-ci , y compris les chaînes . La clé de la préservation des données de fichiers existants est de l'ouvrir en mode «append» pour que le programme ne remplace pas le contenu existant . Utilisez la fonction "Write" pour ajouter une chaîne à la fin du fichier , puis fermez-le dans le code pour éviter toute erreur d'écriture. Instructions 1 Ouvrez votre projet Visual Basic 6 . Double- cliquez sur le contrôle " CommandButton " ajouter " Command1 " de votre formulaire. Double -cliquez sur " Command1 " pour accéder à la " Command1_Click () " fenêtre de code 2 Tapez la suivante pour déclarer les variables que vous devez ajouter la chaîne dans le fichier: . fileName Dim As String myString Dim As String 3 Tapez la commande suivante : filename = " C: \\ myFile.txt " Ouvert nom de fichier pour Append Comme # 1 la fonction "Open" ouvre le fichier spécifié dans le chemin fourni à la variable " nom de fichier" . Si ce fichier n'existe pas, VB6 crée le fichier . La fonction "Ajouter " indique au programme d'ajouter du nouveau contenu à la fin du fichier . La partie "# 1" indique que c'est le premier fichier du programme a ouvert. Vous pouvez utiliser un autre numéro ( ou une variable entière ) si vous avez plus d'un fichier ouvert à la fois dans le programme 4 Type de ce qui suit: . MyString = "Ma chaîne " Write # 1, myString ; vbNewLine Close # 1 la première ligne définit une chaîne , vous ajouterez à la fin du fichier . La deuxième ligne utilise la fonction "Write" pour ajouter la chaîne , puis ajoute une nouvelle ligne dans le fichier pour le rendre plus lisible. La dernière ligne ferme le fichier.
|