Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como carregar uma tabela de um arquivo CSV com o Visual Basic
Visual Basic (VB) é uma linguagem de programação de computador criado pela Microsoft. VB faz adições significativas para o conjunto de primitivas disponíveis na linguagem de programação BASIC original, como recursão e manipulações de string sofisticados. Valores separados por vírgula (CSV) é uma forma generalizada de armazenar informação tabular em arquivos de computador . Em um arquivo CSV, cada linha corresponde a uma linha na tabela que está sendo codificado , cada linha é composta , por sua vez , dos valores correspondentes às entradas da coluna separados por vírgulas. Você pode escrever código VB que lê a entrada CSV em uma matriz na memória para posterior manipulação. Instruções
1

Abra o arquivo CSV no modo de leitura e ler seu conteúdo inteiros , como neste exemplo de código :

Dim alça As Integer Dim

wholeContents As String

handle = FreeFile

Open " input.csv " Para entrada como alça

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

Fechar alça

Substituir " input.csv " pelo nome do arquivo CSV que você precisa analisar .
2

Separe as linhas do arquivo em diferentes elementos de um VB Variant usando a nova linha caracteres como separadores , como neste exemplo de código :

Dim lineContents as Variant

lineContents = Split ( wholeContents , vbCrLf )
3

Alocar o correto número de linhas e colunas para a matriz que conterá os valores no arquivo CSV originais , como neste exemplo de código :

Dim sampleLine as Variant

Dim nRows as Integer

Dim ncols como uma matriz Integer

Dim () As String

nRows = Ubound ( lineContents )

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

ncols = Ubound ( sampleLine )

ReDim array ( nRows , ncols )
4

Copie os valores da Variant contendo todos os valores separados por vírgulas para a matriz VB, como neste exemplo de código :

Dim i as Integer

Dim j como Integer

For i = 0 To nRows

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

Para j = 0 To Ubound ( sampleLine )

array ( i, j) = sampleLine ( j)

Next j

Next i

Depois de executar os dois nested " para" Laços , array "array" conterá os mesmos valores que o arquivo CSV de origem.
< br >

Anterior :

Próximo : No
  Os artigos relacionados
·Como localizar um registro em um conjunto de registros 
·Propriedades comuns entre uma caixa de seleção e opç…
·Como usar um vbNewLine em Vb.Net 
·Como editar um arquivo TXT Usando VBScript 
·Explicação Sub-rotina Visual Basic 
·Como calcular o perímetro e área de um retângulo com…
·Como ler XML usando VB.NET 
·Como terminar um programa em código em Visual Basic 
·Como exibir dados em um DataGridView 
·Técnicas em VBA 
  Artigos em destaque
·Como verificar Rede do Windows Permissões de compartil…
·Como atualizar um registro em MySQL 
·Como desativar uma coluna em um GridView por função 
·Como remover iFrame Scrollbars em JavaScript 
·Java recursão Tutorial 
·Como faço para alterar arquivos FLP 
·Como criar uma classe em Ruby 
·Como autenticar SCCM SQL 
·Alpha Numeric PHP Verificação 
·Um tutorial sobre Gota MySQL 
Cop e direita © Conhecimento computador https://ptcomputador.com Todos os Direitos Reservados