| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan Læs CSV-fil i VB
    kommaadskilt (CSV ) er en simpel tekstfil format, der er almindeligt anvendt til at lagre data. En række repræsenterer hver post i dette format , og inden for hver række , adskiller et komma hver værdi . Visual Basic 6 input-output -fil vandløb eller dataadgang objekt kan bruges til at indlæse og læse en CSV-fil. Ting du skal
    Visual Basic 6
    Vis Flere Instruktioner
    1

    oprette et nyt projekt i Visual Basic. Hvis du ønsker at tilføje funktionalitet til at læse en CSV-fil til et eksisterende projekt , kan du springe dette trin .
    2

    Tilføj en klasse til projektet ved at højreklikke på projektet navn i projektet Explorer og derefter vælge "Add Class Module ".
    3

    Indstil navnet egenskab af klassen til " CFileReader " eller et navn ved hjælp af din kodning standarder.
    4 < p > Tilføj en henvisning til Active data Objects ( ADO ) bibliotek ved at vælge " Projekt> Referencer " i menuen og derefter vælge " Microsoft ActiveX data Objects 2.5 Library" eller "Microsoft ActiveX data Objects 2.6 Library . "

    5

    Indtast følgende kode i klassen : Hej

    Private Function ReadCSV ( ByVal filnavn som String ) Som ADODB.Recordset

    Dim tilslutning Som ADODB.Connection
    < p> Dim fileRecords As ADODB.Recordset

    Dim fileQuery As String

    Dim fieldNum As Integer

    ' Dette drev understøtter Extended Properties =' tekst; FMT = Afgrænset ' " < br >

    ' der er også et yderligere argument , HDR med JA eller NEJ værdier, der angiver , om filen har en header

    ' connOpen " Provider = Microsoft.Jet " _

    ' & " OLEDB.4.0 ; . datakilde = " & App.Path _

    '& " Udvidede Properties =' tekst; HDR = NEJ; " _

    ' & " FMT = Afgrænset ' "

    Set tilslutning = Ny 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

    Denne kode sluttes til en tekstfil ved hjælp af Microsoft tekst driver og vælger alle rækkerne i et ADO-recordsæt .
    6

    Kald funktionen fra den ønskede begivenhed eller konsol applikation .

    Forrige :

    næste :
      Relaterede artikler
    ·Hvordan man laver en genvej til en Jar i VBS 
    ·ActiveX- Tutorial 
    ·Sådan Stop en Infinite Loop på Macro 
    ·Sådan slettes regneark ved hjælp af VBA 
    ·Sådan omdøber Kolonner VBA & Access 
    ·Sådan Læs pixels fra Picture Boxes i VB6 
    ·Sådan Requery en GridView 
    ·Tekst Funktion i VBA 
    ·Sådan Læs xls-fil Vb 
    ·Hvordan kan man se Hvis en Query Exists 
      Anbefalede Artikler
    ·Sådan indstilles Indskudstegn holdning på en DIV på …
    ·Sådan bruges Apache Felix 
    ·Hvad er Låser SQL 
    ·Hvad er Python til Windows PC 
    ·Sådan får User Input i Java 
    ·Sådan deaktiveres Digital Signatur Krav 
    ·Sådan får du adgang til Accelerometer Via Javascript …
    ·Sådan Tjek om du har erklæret en variabel i Python 
    ·Hvordan at hente data i anden kolonne i en ListBox Item…
    ·Hvordan laver man en EXE Med NetBeans 
    Copyright © Computer Viden http://www.computerdk.com