Πώς να αντιγράψει και επικόλληση κειμένου σε αρχεία txt Από VB

. Visual Basic παρέχει δύο ισχυρά εργαλεία για την αντιμετώπιση ειδικά με τα αρχεία κειμένου . Αυτές είναι η μέθοδος " OpenTextFileReader " και η μέθοδος " OpenTextFileWriter " ενσωματωμένη στο " My.Computer.FileSystem " βιβλιοθήκη. Με το συνδυασμό των δύο αυτών μεθόδων , αντιγραφή και επικόλληση κειμένου από ένα αρχείο TXT στο άλλο είναι περιττό . Οδηγίες
Η

1 Δημιουργήστε ένα νέο έργο . Επιλέξτε " Εφαρμογή κονσόλας " . Αργότερα , μπορείτε να χρησιμοποιήσετε τον ίδιο κωδικό σε ένα γραφικό " Windows Forms " εφαρμογή 2

Επικολλήστε τον ακόλουθο στο παράθυρο κώδικα για να ανοίξετε ένα αρχείο κειμένου αναγνώστη και συγγραφέα αρχείο κειμένου : .

dim αναγνώστη = My.Computer.FileSystem.OpenTextFileReader ( " file.txt " )

dim συγγραφέας = My.Computer.FileSystem.OpenTextFileWriter ( " file2.txt " , False )

Αντικαταστήστε τα ονόματα των αρχείων με τα ονόματα που θέλετε να αντιγράψετε από το ( στην περίπτωση του αναγνώστη ) και επικόλληση ( στην περίπτωση του συγγραφέα ) . Η "False " στο TextFileWriter διευκρινίζει ότι το νέο κείμενο δεν θα πρέπει να επισυνάπτεται στο αρχείο , αλλά μάλλον θα πρέπει να αντικαταστήσετε τα τρέχοντα περιεχόμενά του ( εάν υπάρχει) .
Εικόνων 3

Επικολλήστε τον ακόλουθο για να διαβάσετε όλο το κείμενο από το πρώτο αρχείο :

dim s = reader.ReadToEnd ( )
Η 4

Επικολλήστε τον παρακάτω, για να γράψει το κείμενο στο δεύτερο αρχείο :

writer.write ( s )
5

Επικολλήστε τον ακόλουθο για να κλείσει τα δύο αρχεία :

reader.close ( )

writer.close ( )


εικόνων