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

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

Πώς να διαβάσετε ένα κόμμα οριοθετημένο αρχείο σε Visual Basic

Visual Basic είναι μια δημοφιλής γλώσσα προγραμματισμού που δημιουργήθηκε από τη Microsoft . Visual Basic παρέχει ένα ευρύ φάσμα λειτουργιών και των μεθόδων , που επιτρέπει στους προγραμματιστές να δημιουργήσουν εφαρμογές που θα ανταποκρίνονται στις ανάγκες τους . Το αρχείο οριοθετημένο με κόμματα ή κόμμα αρχείο τιμών διαχωρισμένων είναι ένα από τα πιο συχνά παρέχεται αρχεία . Σε αυτόν τον τύπο αρχείου , το κόμμα χρησιμοποιείται για να διαχωρίσετε κάθε στοιχείο του φακέλου , με την επιστροφή της γραμμής που χρησιμοποιείται για να σπάσει το αρχείο σε σειρές . Τέτοια αρχεία συνήθως χρησιμοποιούνται για να περάσει τα δεδομένα μεταξύ διαφορετικών συστημάτων , όπως είναι εύκολο να αναλύσει . Τα πράγματα που θα χρειαστείτε
επεξεργαστή κειμένου
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Δημιουργήστε ένα νέο αρχείο χρησιμοποιώντας ένα πρόγραμμα επεξεργασίας κειμένου, όπως το Notepad ή το Wordpad . Τοποθετήστε το ακόλουθο κείμενο στο αρχείο :

1,2,3,4,5 2

Αποθηκεύστε το αρχείο ως " test.csv " στο root directory του " C : "κίνηση εικόνων
3

Ανοίξτε την εφαρμογή της Visual Basic από το Windows. " Start " κουμπί και να δημιουργήσετε ένα νέο έργο , χρησιμοποιώντας το πλήκτρο" Ctrl "και" πλήκτρα N " . Επιλέξτε το πρότυπο με την ένδειξη " Windows Forms Application ".
Η 4

Δημιουργήστε ένα κουμπί με την ένδειξη " ReadCommaFile " στη φόρμα .
5

Κάντε διπλό κλικ στο " ReadCommaFile " για να ανοίξετε το παράθυρο του κωδικού . Εισάγετε τον παρακάτω κωδικό κάτω από τη γραμμή " Private Sub ReadCommaFile_Click " :

Χρησιμοποιώντας Reader Όπως New _Microsoft.VisualBasic.FileIO.TextFieldParser ( " C : \\ test.csv " ) Reader.TextFieldType = FileIO.FieldType.DelimitedReader . SetDelimiters ( " , " ) Dim currentRow As String ( ) Αν δεν Reader.EndOfDataTrycurrentRow = Reader.ReadFields ( ) Dim currentField Όπως StringFor Each currentField Σε currentRowMsgBox ( currentField ) NextCatch πρώην Όπως Microsoft.VisualBasic.FileIO.MalformedLineExceptionMsgBox ( "Line " και ex . Μήνυμα & _ " παρακάμπτοντας άκυρο γραμμή ") End TryEnd WhileEnd χρησιμοποιώντας
Η 6

Εκτελέστε τον κώδικα σε κατάσταση εντοπισμού σφαλμάτων , χρησιμοποιώντας το πλήκτρο "F5 " .
Η 7

Κάθε ένα από τα πέντε στοιχεία του φακέλου θα εμφανιστεί σε ένα πλαίσιο μηνύματος ένα στοιχείο κάθε φορά .
Η
εικόνων

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

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