推薦：解析.NET FileStreams如何將DTD插入XML文件中
.NET類則更加方便，它會(huì)帶給你更多使用上的靈活性。 技術(shù)工具箱： VB.NET, XML, ADO.NET ADO.NET提供了一種很好的功能來處理dataset和XML之間的轉(zhuǎn)換。你可以通過VS.NET在XML中形象地創(chuàng)

如何解決CSV字段數(shù)據(jù)的雙引號(hào)問題,主要解決CSV字段數(shù)據(jù)帶有雙引號(hào)的問題

具體代碼如下：

以下為引用的內(nèi)容：

Public Function ChangeCsvSplitLine(ByVal strLine As String, ByVal iColNumber As Integer) As String()
Dim strList() As String = strLine.Split(",")
If strList.Length = iColNumber Then
Return strList
End If

Dim i As Integer = 0
Dim findSplitIndex As Integer = -1
Dim index As Integer = 0
Dim returnList(iColNumber) As String
Dim strMerger As String = ""
For i = 0 To strList.Length - 1
If findSplitIndex = -1 Then
If (strList(i)(0) = """" And strList(i)(strList(i).Length - 1) <> """") _
Or (strList(i).Length = 1 And strList(i) = """") Then
findSplitIndex = i
Else
returnList(index) = strList(i)
index = index 1
End If
Else
If (strList(i)(0) <> """" And strList(i)(strList(i).Length - 1) = """") _
Or (strList(i).Length = 1 And strList(i) = """") Then
strMerger = ""
For findSplitIndex = findSplitIndex To i
strMerger = strMerger & strList(findSplitIndex) & ","
Next
strMerger = strMerger.Substring(0, strMerger.Length - 1)
returnList(index) = strMerger
index = index 1
findSplitIndex = -1
End If
End If
Next
Return returnList
End Function

分享： 解析VB.NET中的常量與枚舉功能
在程序運(yùn)行的過程中始終固定不變的量稱為常量。由于在程序設(shè)計(jì)和開發(fā)時(shí)經(jīng)常會(huì)反復(fù)地運(yùn)用一些常數(shù)，而且它們代表的含義有時(shí)候非常難記，所以每次都需要去核對(duì)，如果定義了常量將使之簡(jiǎn)單化