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.