[VB.NET] Leggere un file CSV velocemente

[panda99]

Salve a tutti,
ho un file CSV molto lungo, e vorrei che il mio programma lo leggesse in modo veloce. Ho provato questo codice:

Public Sub ReadCSV(CSV As String) 
Dim ary(0) As String 
Dim sr As New System.IO.StreamReader(CSV) 
Dim placeholder As Integer = 0 

Do While sr.Peek <> -1 
ReDim Preserve ary(placeholder) 
placeholder += 1 
Loop 

Console.WriteLine("Waiting for the file 'verified_online.csv'...") 
Console.WriteLine("Reading data from 'verified_online.csv") 
Console.WriteLine(ary) 
End Sub

ma non sembra funzionare, è troppo lento!
Volevo sapere se c'è un modo o un trucco per rendere la lettura più veloce.

Grazie,
Panda