Hvordan legge til en streng på slutten av en fil i Visual Basic 6

File manipulasjon er ofte et felles behov for dataprogram brukere. Visual Basic 6 har noen enkle, lett-å-bruke funksjoner som lar deg åpne en eksisterende fil og legge ny informasjon til slutten av den, inkludert strenger. Nøkkelen til å bevare den eksisterende filen data er å åpne den i "Tilføy" modus slik at programmet ikke overskrive eksisterende innhold. Bruk "Write" -funksjonen for å legge en streng til slutten av filen, og lukk den i kode for å unngå eventuelle skrivefeil.

Bruksanvisning

1 Åpne Visual Basic 6 prosjektet. Dobbeltklikk på "Command" kontroll for å legge til "Command1" i skjemaet. Dobbeltklikk på "Command1" for å få tilgang til "Command1_Click ()" code vinduet.

2 Skriv inn følgende å erklære de variablene du trenger å legge strengen til filen:

Dim filnavn som String

Dim myString As String

3 Skriv inn følgende:

filename = "C: \ minfil.txt"

Åpne filnavn For Append As # 1

"Open" -funksjonen åpner filen som er angitt i banen gitt til "filename" variable. Hvis denne filen ikke finnes, oppretter VB6 filen. Den "Tilføy" -funksjonen forteller programmet for å legge til nytt innhold til slutten av filen. Den "# 1" del som angir at dette er den første filen programmet har åpent. Du kan bruke et annet nummer (eller et heltall variabel) hvis du har mer enn én fil åpne samtidig i programmet.

4 Skriv inn følgende:

myString = "My string"

Skriv # 1, myString; vbNewLine

Lukk # 1

Den første linje angir en streng man vil legge til slutten av filen. Den andre linjen bruker "Write" -funksjonen for å legge strengen, og deretter legger til en ny linje i filen for å gjøre den mer lesbar. Den siste linjen lukker filen.