Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να οριοθετήσει αρχείων κειμένου δεδομένων σε Visual Basic 2003

Ανάγνωση πληροφοριών από ένα αρχείο κειμένου είναι ένα ουσιαστικό μέρος της πολλά προγράμματα υπολογιστών . Visual Basic σας παρέχει με την κατηγορία TextFieldParser ως μέρος της εισόδου του αρχείου και έξοδος namespace . Η κατηγορία αυτή διαβάζει τις πληροφορίες από ένα αρχείο κειμένου και σας βοηθά να οργανώσετε τα δεδομένα στο πλαίσιο του προγράμματός σας . Μπορείτε να επιλέξετε έναν οριοθέτη με βάση την οργάνωση αρχείων κειμένου σας , και να χρησιμοποιήσετε μια σειρά από strings για να αποθηκεύσετε τα δεδομένα σας . Από εκεί , μπορείτε να χειριστείτε ή να μετατρέψετε τα δεδομένα σας, όπως απαιτείται . Οδηγίες
Η 1

Ξεκινήστε ένα νέο έργο , και να προσθέσετε μια φόρμα . Ανοίξτε το παράθυρο κώδικα για το πού θα έχετε διαβάσει το πρόγραμμά σας από ένα αρχείο κειμένου , για παράδειγμα , σε μια συνάρτηση κουμπί εντολής ή όταν τα φορτία μορφή . 2

Τύπος "Χρήση MyReader η Νέα Microsoft.VisualBasic . FileIO.TextFieldParser ( « full_path_to_file " ) " . Αναπληρωτής " full_path_to_file " με την πραγματική θέση του αρχείου κειμένου σας , για παράδειγμα , " C : \\ test.txt " .
Εικόνων 3

Τύπος " MyReader.TextFieldType = FileIO.FieldType.Delimited " στην επόμενη γραμμή και « MyReader.SetDelimiters ( " delimiter_character " ) " στη γραμμή μετά από αυτό . Αναπληρωτής " delimiter_character " με ένα πραγματικό χαρακτήρα που χρησιμοποιεί το αρχείο κειμένου σας για να διαχωρίσετε τα πεδία , όπως κόμμα ή για μια περίοδο .
Η 4

Τύπος "Dim currentRow As String ( ) " σε μια νέα γραμμή . Θα πρέπει να συμπεριλάβετε τις αγκύλες μετά τη δήλωση μεταβλητών σας για να βεβαιωθείτε ότι το Visual Basic διαβάζει τα πεδία κειμένου σε μια σειρά , ή αλλιώς θα δημιουργήσει ένα σφάλμα .
5

Τύπος " While Not MyReader.EndOfData " για να ξεκινήσει ένας βρόχος που θα διαβάσει ολόκληρο το αρχείο κειμένου σας . Πληκτρολογήστε " Try" από μόνη της σε μια νέα γραμμή , και κάτω από αυτό το είδος "Dim currentField As String " για να δημιουργήσετε μια προσωρινή μεταβλητή για να διαβάσετε τις τιμές πεδίου από αρχεία κειμένου σας .
Η 6

Τύπος " Για Κάθε currentField σε currentRow "για να ξεκινήσει μια θηλιά που θα εκτελέσετε μια ενέργεια σε κάθε πεδίο κειμένου . Για παράδειγμα , για να εμφανίσετε κάθε καταχώρηση δεδομένων , πληκτρολογήστε " MsgBox ( currentField ) " και στη συνέχεια " Next" σε δύο γραμμές . Μπορείτε επίσης να αποθηκεύσετε τα δεδομένα σε μια συστοιχία σειρά , να το μετατρέψετε σε άλλο τύπο δεδομένων , ή να κάνετε ό, τι πρέπει να κάνουμε εδώ .
Η

7 Πληκτρολογήστε " Catch ex Όπως Microsoft.VisualBasic.FileIO.MalformedLineException " στην επόμενη γραμμή για να εξασφαλίσει το πρόγραμμά σας μπορεί να χειριστεί τα λάθη και να μην συντριβή κατά τη διάρκεια της εκτέλεσης . Πληκτρολογήστε " End Try " , "End Ενώ " και "End χρήση " σε τρεις ξεχωριστές γραμμές για να έχουν το πρόγραμμα σας να συνεχίσει άλλες λειτουργίες όταν τελειώσει την ανάγνωση του αρχείου κειμένου .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα