VB.net 读取文本文件,该怎么解决

VB.net 读取文本文件
比如CSV文件上有如下数据，假设文件路径为 D:\ test.csv
15,50,100,200
20,60,120,200
40,70,130,200
60,80,150,200
90,90,180,200
第一列 (不是一行) 存为数组1，第二列存为数组2,第三列存为数组3······方便调用里面数据
且把第一列的数据放入到 ListBox1控件中，
希望高人指点，万分感谢~~~~
------解决方案--------------------
Dim lines = System.IO.File.ReadAllLines("C:\1.csv")
Dim array1 As String() = lines.Select(Function(x) Split(x, ",")(0)).ToArray()
Dim array2 As String() = lines.Select(Function(x) Split(x, ",")(1)).ToArray()
...
For Each s As String In array1
    listBox1.Items.Add(s)
Next
------解决方案--------------------

引用:

Dim lines = System.IO.File.ReadAllLines("C:\1.csv")
Dim array1 As String() = lines.Select(Function(x) Split(x, ",")(0)).ToArray()
Dim array2 As String() = lines.Select(Function(x) Split(x, ",")(1)).ToArray()
...
For Each s As String In array1
    listBox1.Items.Add(s)
Next

For Each s As String In array1
    listBox1.Items.Add(s)
Next 
以上语句，一句话就搞定 listBox1.items.addRange(array1).