Cuestión : corregir el archivo de CSV en VB. El estudio visual 2010 utilizó.

Tengo un archivo de CSV que parezca esto: ¿el
a, b, c, d, e, f
1,2,3,4,5,6

Can cualquier persona me ayuda a imaginar una manera de eliminar la Nth (deja para decir 4ta) columna de cada línea en VB? el

I encontró una manera de analizarla en línea que parece esto: el

Private Button1_Click secundario (remitente de ByVal como System.Object, ByVal e como System.EventArgs) dirige Button1.Click

usar MyReader como nuevo
de Microsoft.VisualBasic.FileIO.TextFieldParser (“v del c:\test.cs”) MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType. Delimited
'fijó el delimitador a cualquier value
MyReader.Delimiters = nuevo lazo de la secuencia () {”, “} el

amortigua el currentRow como ()/>
'a través de todos los campos en el archivo. las líneas del
'eventualmente son corruptas, divulgan un error y continúan analizando.
mientras que no currentRow de MyReader.EndOfData
Try
= () ouput del
'el segundo valor de cada línea para demostrar que el archivo ha sido el currentRow de parsed.
(4)

MsgBox retén del
(del currentRow (4)) ex como Microsoft.VisualBasic.FileIO.MalformedLineException
MsgBox (“línea” y ex. El mensaje y el _
“es inválidos. ”) el
termina el extremo Sub

de Using

del final de While

del final de Try

--------------------------el

Works bastante bien, sin embargo, necesito no demostrar este valor, pero SUPRIMO it.

thank usted,
class= del

Respuesta : corregir el archivo de CSV en VB. El estudio visual 2010 utilizó.

“Necesito suprimir columnas 100, 88, y 85 para hacer mirada del formato iguales.”

Usted puede hacerla toda en iguales para el lazo:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
    El submarino privado Button1_Click (remitente de ByVal como System.Object, ByVal e como System.EventArgs) dirige Button1.Click
        Nombre de fichero dévil como secuencia = “c:\test.csv”
        Líneas déviles () como la secuencia = System.IO.File.ReadAllLines (nombre de fichero)
        Valores déviles como nueva lista (de secuencia)
        Para i como número entero = 0 a lines.GetUpperBound (0)
            valores. Despejar ()
            values.AddRange (líneas (i). Fractura (“, "))

            'quitar todas las columnas indeseadas en al revés ordenan 
            'usted no tiene que tan ajustar los números de columna mientras que usted va
            values.RemoveAt (99) 'quitan la 100a columna
            values.RemoveAt (87) 'quitan la 88.a columna
            values.RemoveAt (84) 'quitan la 85a columna

            líneas (i) = String.Join (“,”, values.ToArray)
        Después
        System.IO.File.WriteAllLines (nombre de fichero, líneas)
    Submarino del extremo
Otras soluciones  
 
programming4us programming4us