Como reordenar os campos de um arquivo delimitado (LINQ) (Visual Basic)
Um arquivo CSV (valores separados por vírgula) é um arquivo de texto que geralmente é usado para armazenar dados de planilha ou outros dados tabulares representados por linhas e colunas. Usando o Split método para separar os campos, é muito fácil consultar e manipular arquivos CSV usando LINQ. Na verdade, a mesma técnica pode ser usada para reordenar as partes de qualquer linha estruturada de texto; não se limita a ficheiros CSV.
No exemplo a seguir, suponha que as três colunas representam o "sobrenome", "nome" e "ID" dos alunos. Os campos estão em ordem alfabética com base nos sobrenomes dos alunos. A consulta produz uma nova sequência na qual a coluna ID aparece primeiro, seguida por uma segunda coluna que combina o nome e o sobrenome do aluno. As linhas são reordenadas de acordo com o campo ID. Os resultados são salvos em um novo arquivo e os dados originais não são modificados.
Para criar o arquivo de dados
Copie as linhas a seguir em um arquivo de texto sem formatação chamado spreadsheet1.csv. Salve o arquivo na pasta do projeto.
Adams,Terry,120 Fakhouri,Fadi,116 Feng,Hanying,117 Garcia,Cesar,114 Garcia,Debra,115 Garcia,Hugo,118 Mortensen,Sven,113 O'Donnell,Claire,112 Omelchenko,Svetlana,111 Tucker,Lance,119 Tucker,Michael,122 Zabokritski,Eugene,121
Exemplo
Class CSVFiles
Shared Sub Main()
' Create the IEnumerable data source.
Dim lines As String() = System.IO.File.ReadAllLines("../../../spreadsheet1.csv")
' Execute the query. Put field 2 first, then
' reverse and combine fields 0 and 1 from the old field
Dim lineQuery = From line In lines
Let x = line.Split(New Char() {","})
Order By x(2)
Select x(2) & ", " & (x(1) & " " & x(0))
' Execute the query and write out the new file. Note that WriteAllLines
' takes a string array, so ToArray is called on the query.
System.IO.File.WriteAllLines("../../../spreadsheet2.csv", lineQuery.ToArray())
' Keep console window open in debug mode.
Console.WriteLine("Spreadsheet2.csv written to disk. Press any key to exit")
Console.ReadKey()
End Sub
End Class
' Output to spreadsheet2.csv:
' 111, Svetlana Omelchenko
' 112, Claire O'Donnell
' 113, Sven Mortensen
' 114, Cesar Garcia
' 115, Debra Garcia
' 116, Fadi Fakhouri
' 117, Hanying Feng
' 118, Hugo Garcia
' 119, Lance Tucker
' 120, Terry Adams
' 121, Eugene Zabokritski
' 122, Michael Tucker