Creare un nuovo file utilizzando un editor di testo come Blocco note o Wordpad . Inserire il testo seguente nel file :
1,2,3,4,5
2
Salvare il file come " test.csv " nella directory principale del " C : "drive
3
Aprire l'applicazione di Visual Basic da Windows . " Start " e creare un nuovo progetto con i" tasti N " Ctrl " e " . Selezionare il modello di etichetta "Windows Forms Application ".
4
Creare un pulsante " ReadCommaFile " sul modulo .
5 Fare doppio clic su " ReadCommaFile " per aprire la finestra del codice . Inserire il seguente codice sotto la riga " Private Sub ReadCommaFile_Click " :
Utilizzando Reader As New _Microsoft.VisualBasic.FileIO.TextFieldParser ( "C : \\ test.csv " ) Reader.TextFieldType = FileIO.FieldType.DelimitedReader . SetDelimiters ( "," ) Dim CurrentRow As String ( ), mentre non Reader.EndOfDataTrycurrentRow = Reader.ReadFields ( ) Dim currentField Come StringFor Ogni currentField In currentRowMsgBox ( currentField ) NextCatch ex come Microsoft.VisualBasic.FileIO.MalformedLineExceptionMsgBox ( "Linea " e ex . Messaggio & _ " skipping linea non valida ") End TryEnd WhileEnd utilizzando
6
Eseguire il codice in modalità di debug utilizzando il tasto " F5 " .
7
Ciascuna cinque elementi del file verranno visualizzati in una finestra di messaggio di un elemento alla volta .
Programmazione © www.354353.com