Comma Separated Value (CSV) est un simple format de fichier texte qui est couramment utilisé pour stocker des données . Une ligne représente chaque enregistrement dans ce format, et dans chaque ligne, une virgule sépare chaque valeur. Flux Visual Basic 6 entrées-sorties fichiers ou objets d'accès aux données peuvent être utilisées pour charger et lire un fichier CSV. Choses que vous devez
Visual Basic 6
Voir Plus Instructions
1

créer un nouveau projet dans Visual Basic. Si vous souhaitez ajouter la fonctionnalité de lire un fichier CSV à un projet existant , vous pouvez sauter cette étape .
2

Ajouter une classe au projet par un clic droit sur le nom du projet dans le projet explorer, puis en sélectionnant " Module Ajouter une classe . "
3

Définissez la propriété nom de la classe à " CFileReader " ou un nom en utilisant vos normes de codage .
4 < p> Ajouter une référence à l' active Data Objects ( ADO) de la bibliothèque en sélectionnant le "Projet> Références " dans le menu , puis en sélectionnant le " Microsoft ActiveX Data Objects 2.5 Library " ou la " ActiveX Data Objects 2.6 Library Microsoft . "

5

Entrez le code suivant dans la classe :

privé Fonction ReadCSV ( fileName ByVal As String) As ADODB.Recordset

connexion As ADODB.Connection
< p> fileRecords As ADODB.Recordset

fileQuery Dim As String

fieldNum As Integer

' Ce lecteur prend en charge les propriétés étendues = ' text ; fmt = délimité »

« Il ya aussi un argument supplémentaire , HDR par oui ou non les valeurs qui indique si le fichier a une tête

' " Provider = Microsoft.Jet " connOpen _

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

" &" Extended Properties = 'text ; HDR = NO ; "_

" & " fmt = délimité » Photos

connexion Set = 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

Fin de Fonction:

Ce code se connecte à un fichier texte en utilisant le Microsoft pilote de texte et sélectionne toutes les lignes dans un jeu d'enregistrements ADO.
6

appeler la fonction à partir de l'événement souhaité ou l'application de la console.