Vb.net 如何删除CSV文件解析返回的文本周围的引号
我正在使用下面的代码编译纳斯达克证券交易所的股票代码列表。我使用的是位于此处的CSV文件: 当我在Excel中打开CSV文件时,股票代码符号周围没有引号。但是当我运行下面的代码时。返回到我的列表中的所有股票代码都有引号。为什么会这样?我如何去掉引号呢 这是我的密码:Vb.net 如何删除CSV文件解析返回的文本周围的引号,vb.net,parsing,csv,split,string-split,Vb.net,Parsing,Csv,Split,String Split,我正在使用下面的代码编译纳斯达克证券交易所的股票代码列表。我使用的是位于此处的CSV文件: 当我在Excel中打开CSV文件时,股票代码符号周围没有引号。但是当我运行下面的代码时。返回到我的列表中的所有股票代码都有引号。为什么会这样?我如何去掉引号呢 这是我的密码: Public Shared tickerList As New List(Of String) Dim compositeList As New List(Of String) Dim strBuffer As String
Public Shared tickerList As New List(Of String)
Dim compositeList As New List(Of String)
Dim strBuffer As String
strBuffer = Historical_Stock_Prices.RequestWebData(http://www.nasdaq.com/screening/companies-by-industry.aspx?exchange=NASDAQ&render=download)
Dim sReader As New StringReader(strBuffer)
Dim Line_List As New List(Of String)
Do While sReader.Peek >= 0
Line_List.Add(sReader.ReadLine)
Loop
Line_List.RemoveAt(0)
For Each Line In Line_List
compositeList.Add(Line.Split(",")(0).Trim.ToLower)
Next
sReader.Close()
tickerList = compositeList.Distinct.ToList
tickerList.Sort()
这将删除第一个和最后一个字符
compositeList.Add(Line.Split(",")(0).Trim(New Char() {""""}).ToLower)
这将删除第一个和最后一个字符。不要使用.Split()解析csv数据。有许多专用的csv解析器可以做得更好:,,所有这些都会浮现在我的脑海中。@JoelCoehoorn:这就是我所使用的-工作得非常好。每秒解析约70K条记录或类似记录。不要使用.Split()解析csv数据。有许多专用的csv解析器可以做得更好:,,所有这些都会浮现在我的脑海中。@JoelCoehoorn:这就是我所使用的-工作得非常好。每秒解析大约70K条记录或类似的记录。@gromit1:如果DonA的回答有帮助,请不要忘记接受和/或向上投票。@gromit1:如果DonA的回答有帮助,请不要忘记接受和/或向上投票。
compositeList.Add(Line.Split(",")(0).Trim(New Char() {""""}).ToLower)