Ako čítať súbor CSV v VB

hodnoty oddelené čiarkami ( CSV ​​) je jednoduchý textový formát súboru , ktorý sa bežne používa na ukladanie dát . Riadok predstavuje každý záznam v tomto formáte , a v každom riadku , čiarka oddeľuje jednotlivé hodnoty . Visual Basic prúdy 6 vstupno - výstupných súborov alebo prístup k dátam objektu možno použiť na načítanie a čítanie súboru CSV . Veci , ktoré budete potrebovať
Visual Basic 6
Zobraziť ďalšie inštrukcie Cestuj 1

Vytvorenie nového projektu v jazyku Visual Basic . Ak chcete pridať funkcie pre čítanie súboru CSV do existujúceho projektu , môžete tento krok preskočiť .
2

Pridanie triedy do projektu kliknutím pravým tlačidlom myši na názov projektu v projekte explorer a potom zvolíte " pridať modul triedy . "
3

Nastavte vlastnosť názov triedy pre " CFileReader " alebo meno pomocou svojej normy označovania.
4

Pridať odkaz na Active Data Objects ( ADO ) knižnice výberom menu " Project > References " a výberom " Microsoft ActiveX Data Objects 2.5 Library " alebo " Microsoft ActiveX Data Objects 2.6 Library . "

5

Zadajte nasledujúci kód v triede : klipart

Private Function ReadCSV ( byval názov súboru , ako String ) ako ADODB.Recordset

Dim pripojenie ako ADODB.Connection

Dim fileRecords Ako ADODB.Recordset

Dim fileQuery As String Dim

fieldNum As Integer

" Táto jednotka podporuje Extended Properties = ' Text , FMT = oddeľovač " "

" Tam je tiež ďalší dôvod , HDR sa áno alebo nie hodnoty , ktoré ukazuje , či súbor má hlavičku

' connOpen " Provider = Microsoft.Jet " _

" & " . OLEDB.4.0 ; Data Source = " & App.Path _

" a " Extended Properties = ' text ; HDR = NO , " _

" & " FMT = oddeľovačmi ' "

Set connection = New ADODB.Connection

connection.ConnectionString = _

" Driver = { Microsoft Text Driver ( * txt , .. * csv ) } ; " & _

" DBQ = " & App.Path & " " , " " , " "

connection.Open

fileQuery = " SELECT * FROM " & fileName

Set fileRecords = connection.Execute ( fileQuery )

Set ReadCSV = fileRecords

End Function

Tento kód sa pripojí do textového súboru pomocou Microsoft text vodiča a vyberie všetky riadky do sadu záznamov ADO .
6

Volanie funkcie z požadovanej udalosti alebo aplikácie konzoly .

• Predchádzajúca strana: Ako získať prístup Query Null Argument VBA 
• Ďalšia strana: Ako zarovnať text v jazyku Visual Basic Combo Box