“Conocimiento Programación>Visual Basics Programación

Cómo leer un archivo CSV en VB

2012/4/28
valores separados por comas ( CSV ​​) es un formato de archivo de texto simple que se utiliza comúnmente para almacenar datos. Una fila representa cada registro en este formato, y dentro de cada fila, una coma separa cada valor. 6 secuencias de archivo de entrada-salida de Visual Basic o de objetos de acceso a datos se pueden utilizar para cargar y leer un archivo CSV. Cosas que necesitará
Visual Basic 6
Ver Más instrucciones
1

Crear un nuevo proyecto en Visual Basic . Si desea añadir la funcionalidad para leer un archivo CSV a un proyecto existente , puede saltarse este paso.
2

Agregar una clase al proyecto , haga clic en el nombre del proyecto en el Proyecto explorer y seleccionando la opción " Agregar módulo de clase . "
3

Establezca la propiedad nombre de la clase de " CFileReader " o un nombre con sus estándares de codificación .
4 < p> Añadir una referencia a los objetos de datos activos ( ADO) biblioteca seleccionando el "Proyecto> Referencias" del menú y luego seleccionar la opción " Microsoft ActiveX Data Objects 2.5 Library " o el " ActiveX Data Objects 2.6 Library Microsoft . "
Página 5

Escriba el siguiente código en la clase :

privado Función ReadCSV ( fileName ByVal como secuencia) como ADODB.Recordset

conexión As ADODB.Connection
< p> fileRecords dévil como ADODB.Recordset

fileQuery dévil como secuencia

numCamp Dim As Integer

" Esta unidad es compatible con las propiedades extendidas = 'text ; FMT = delimitado "

' también hay un argumento adicional , HDR con sí o no los valores que indica si el archivo tiene un encabezado

" Provider = Microsoft.Jet " connOpen _

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

" &" ; propiedades extendidas = 'text ; HDR = NO; "_

" & " FMT = delimitado "
conexión 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 )

Establecer ReadCSV = fileRecords

End Function

Este código se conecta a un archivo de texto con el Microsoft controlador de texto y selecciona todas las filas en un conjunto de registros ADO .
6

llamar a la función desde el evento deseado o aplicación de consola.

Visual Basics Programación
Cómo encontrar el valor máximo de una matriz en Visual Basic
Cómo configurar una red
¿Cómo se hace tu propio diagrama de Venn en la computadora?
Cómo llamar a procedimientos almacenados en Visual Basic
¿Qué datos almacenan los tipos de Visual Basic?
Cómo deshabilitar el botón Cerrar en Visual Basic 6
Cómo utilizar VBA para recuperar Microsoft Windows Usuario
Cómo quitar caracteres especiales de una cadena VB
Conocimiento de la computadora © http://www.ordenador.online