Red de conocimiento informático - Problemas con los teléfonos móviles - Tengo un problema con la operación CSV en vb.net, por favor dame una respuesta urgente

Tengo un problema con la operación CSV en vb.net, por favor dame una respuesta urgente

Simplemente use el lector y escritor de transmisiones

Use sr2 como un nuevo archivo de escritor de transmisiones ("2.csv", false, Text.) para escribir Enter

¿Usar sr1 como nuevo lector de flujo ("1.csv", Text.Encoding.Default)? El archivo a leer

¿Mientras?Not?sr1.EndOfStream ?'EndOfStream=True indica el final de leyendo

'Leyendo

Dim?lineread?As?String?=?"" ?'Línea para leer más tarde

Dim?linewrite?As?String ?=?"" ?'La línea que se escribirá más tarde

Dim?data?As?String()?Array de cada dato

lineread?=?sr1.ReadLine?' Leer una línea y retroceder una línea el flujo de datos

'Ahora puede usar If para determinar si desea eliminar la línea. Si desea eliminar, utilice Else para saltar directamente a la siguiente declaración.

data?=?lineread.Split(",".ToCharArray,?StringSplitOptions.RemoveEmptyEntries)? Lea una fila de datos, separados por comas y guárdelos en una matriz

'Los siguientes son los datos leídos, puede procesarlos usted mismo

¿Para?Cada?elemento?Como? String ?In?data

linewrite?amp;=?item?amp;?", "?'csv está separado por comas, por lo que también debemos recordar agregar comas al escribir

Siguiente

'Escribir

If?linewrite.EndsWith(",")?? "¿Entonces? "Elimine la última coma de la línea.

'Si antes se leyó una línea en blanco, no se ejecutará aquí. Piensa en por qué

sr2.WriteLine(linewrite.Remove(linewrite.Length?-?1,?1))

End?If

'If before If se utiliza para determinar la fila que se eliminará, ¿Fin? Si se debe agregar aquí.

¿Fin?Mientras

sr1.Close()

¿Fin?Usando

sr2.Flush()

sr2.Flush()

¿Fin?