Ανοίξτε Visual Basic 6 το έργο σας . Κάντε διπλό κλικ στο " CommandButton " ελέγχου για να προσθέσετε το " Command1 " στη φόρμα σας . Κάντε διπλό κλικ στο " Command1 " για να αποκτήσετε πρόσβαση στο " Command1_Click ( ) " παράθυρο κώδικα 2
Πληκτρολογήστε το παρακάτω, για να δηλώσει τις μεταβλητές που θα πρέπει να προσθέσετε το string στο αρχείο : .
Dim fileName Όπως String Dim
myString Όπως String
εικόνων 3
Πληκτρολογήστε τα παρακάτω:
fileName = " C : \\ myfile.txt "
Open fileName για Προσάρτηση Όπως # 1
η λειτουργία "Άνοιγμα" ανοίγει το αρχείο που καθορίζεται στη διαδρομή στη διάθεση της " fileName " μεταβλητή . Αν αυτό το αρχείο δεν υπάρχει , VB6 δημιουργεί το αρχείο . Η λειτουργία " Προσάρτηση " λέει το πρόγραμμα για να προσθέσετε νέο περιεχόμενο στο τέλος του αρχείου . Το " # 1 " τμήμα διευκρινίζει ότι αυτό είναι το πρώτο αρχείο , το πρόγραμμα έχει ανοίξει . Μπορείτε να χρησιμοποιήσετε έναν άλλο αριθμό ( ή μια ακέραια μεταβλητή ), αν έχετε περισσότερα από ένα αρχείο ανοιχτό σε έναν χρόνο στο πρόγραμμα
Η 4
Πληκτρολογήστε τα ακόλουθα : .
MyString = " My string "
Γράψτε # 1 , myString ? vbNewLine
Close # 1
η πρώτη γραμμή θέτει μια σειρά , θα προσθέσει στο τέλος του αρχείου . Η δεύτερη γραμμή χρησιμοποιεί τη λειτουργία " Write " για να προσαρτήσει το string , στη συνέχεια προσθέτει μια νέα γραμμή στο αρχείο για να γίνει πιο ευανάγνωστο . Η τελευταία γραμμή κλείνει το αρχείο .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα