Visual Basic ( VB ) er en computer programmeringssprog skabt af Microsoft . VB gør væsentlige tilføjelser til det sæt af primitiver til rådighed i den oprindelige BASIC programmeringssprog, såsom rekursion og sofistikeret snor manipulationer. Kommasepareret værdier ( CSV) er en udbredt form for lagring af tabular oplysninger i computerfiler. I en CSV-fil , svarer hver linje til en række i tabellen blive kodet , hver række består til gengæld af værdier svarende til kolonnen poster adskilt af kommaer . Du kan skrive VB kode, der lyder CSV input til en in- memory array for yderligere manipulation . Instruktioner
1

Åbn CSV -fil i læse mode og læste sine hele indholdet , som i dette kodeeksempel : Hej

Dim håndtag Som Integer

Dim wholeContents As String

håndtag = FreeFile

Åbn " input.csv " For Input Som håndtere

wholeContents = Input $ ( LOF ( håndtag) , # håndtag )

Luk håndtag

Erstat " input.csv " af navnet på den CSV-fil , du har brug for at analysere .
2

separate filens linjer i forskellige elementer i en VB Variant bruger newline tegn som separatorer som i dette kodeeksempel :

Dim lineContents As Variant

lineContents = Split ( wholeContents , vbCrLf )
3

tildele de korrekte antallet af rækker og kolonner til array , der skal indeholde de værdier i den oprindelige CSV-fil , som i dette kodeeksempel : Hej

Dim sampleLine som Variant

Dim nRows As Integer
< p > Dim nCols As Integer

Dim Array ( ) As String

nRows = UBound ( lineContents )

sampleLine = Split ( lineContents (0) , ",") < br >

nCols = UBound ( sampleLine )

ReDim array ( nRows , nCols )
4

Kopier værdierne fra Variant indeholder alle kommasepareret i VB array, som i dette kodeeksempel : Hej

Dim i As Integer

Dim j som Integer

For i = 0 Til nRows

sampleLine = Split ( lineContents ( i) , ",")

j = 0 Til UBound ( sampleLine )

array ( i, j ) = sampleLine ( j )

Næste j

Næste jeg

Efter udførelsen af ​​den to indlejrede "For" loops, array " array" vil indeholde de samme værdier som den oprindelige CSV-fil.
< br >