Nwlapcug.com


Come caricare una tabella da un File CSV con Visual Basic

Visual Basic (VB) è un linguaggio creato da Microsoft di programmazione. VB mette a disposizione l'originale linguaggio di programmazione BASIC, come ricorsione e manipolazioni di stringhe sofisticato significative aggiunte al set di primitive. Valori separati da virgola (CSV) è una forma diffusa di memorizzazione di informazioni in formato tabulare in file del computer. In un file CSV, ogni riga corrisponde a una riga della tabella in fase di codifica; ogni riga è costituito, a sua volta, i valori corrispondenti alle voci della colonna separate da virgole. È possibile scrivere codice di Visual Basic che legge CSV input in una matrice in memoria per ulteriori manipolazioni.

Istruzioni

1

Aprire il file CSV in modalità lettura e leggerne il contenuto intero, come in questo esempio di codice:

Dim handle As Integer

Dim wholeContents As String

gestire = FreeFile

Aperto "input. csv" per Input come maniglia

wholeContents = Input$(LOF(handle),#handle)

Chiusura handle

Sostituire il nome del file CSV che è necessario analizzare "input. csv".

2

Separare le righe del file in diversi elementi di una variante di VB usando i caratteri di nuova riga come separatori, come in questo esempio di codice:

Dim lineContents As Variant

lineContents = Split(wholeContents,vbCrLf)

3

Allocare il numero corretto di righe e colonne nella matrice che conterrà i valori nel file CSV originale, come questo esempio di codice:

Dim sampleLine As Variant

Dim nRows As Integer

Dim nCols As Integer

Dim Array () As String

nRows = Ubound(lineContents)

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

nCols = Ubound(sampleLine)

ReDim array(nRows,nCols)

4

Copiare i valori dalla variante contenente tutti i valori separati da virgole nella matrice VB, come in questo esempio di codice:

Dim i as Integer

Dim j as Integer

Per i = 0 To nRows

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

For j = 0 To Ubound(sampleLine)

array(i,j) = sampleLine(j)

Prossima j

Prossima ho

Dopo l'esecuzione di due nested "loop For", "matrice" conterrà gli stessi valori del file CSV originale.