将.CSV文件加载到元组列表并组合值VB.NET

Imports System.IO

Public Class CSVLoader
    Public Shared Function LoadCSV(filePath As String) As List(Of Tuple(Of String, String))
        Dim tupleList As New List(Of Tuple(Of String, String))()

        Using reader As New StreamReader(filePath)
            While Not reader.EndOfStream
                Dim line As String = reader.ReadLine()
                Dim values As String() = line.Split(","c)

                If values.Length = 2 Then
                    Dim tuple As New Tuple(Of String, String)(values(0), values(1))
                    tupleList.Add(tuple)
                End If
            End While
        End Using

        Return tupleList
    End Function
End Class

Dim filePath As String = "path/to/your/file.csv"
Dim tuples As List(Of Tuple(Of String, String)) = CSVLoader.LoadCSV(filePath)

For Each tuple As Tuple(Of String, String) In tuples
    Dim value1 As String = tuple.Item1
    Dim value2 As String = tuple.Item2

    ' 进行你的操作，例如组合值
    Dim combinedValue As String = value1 & value2

    Console.WriteLine(combinedValue)
Next