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
Κάθε ένα από τα πέντε στοιχεία του φακέλου θα εμφανιστεί σε ένα πλαίσιο μηνύματος ένα στοιχείο κάθε φορά .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα