获取一个 2D 数组以使用 VB.NET 逐行写入和读取

get a 2d array to write and read line by line using VB.NET

提问人:Nathaniel Turner 提问时间:6/22/2023 更新时间:6/22/2023 访问量:32

问:

我正在尝试使用 VB.Net 读取 2d 数组中的 txt 文件,我可以将 msgbox 插入到我的第一个 For next 循环的顶部并逐字获取所有信息。但是如果我超出我的下一个循环,我无法访问所有信息我的最终目标是能够说如果第一列 = xyz GOTO Line123 并遍历数组,当它进入其分配的 GOTO 行时,它将写入一个新的 txt 文件,其中包含整行中的所有信息。截至目前,我使用的是 40x62 的小数组,以下是我使用的代码。ReadAllLines(R\TxtFile.csv“)。长度 -1 获取我的文本文件的长度以确定所需的行数,因为它会经常变化。MonitorIDColumn 应读取第 0 列中的所有内容,然后我需要使用它来写入该行中所有内容的文件。我做错了什么???????

file.ReadAllLines(R\TxtFile.csv").Length -1    
reader = New streamReader("R:\TxtFile.scv")
    Dim Linie as string 
    Dim x,y as integer
    For x = 0 to LineCount
        Linie = reader.ReadLine
        For y = 0 to 62 
        CRSFile2DArray(x,y) = Split(Linie, ",")(y)
        MsgBox(CRSFile2DArray(x,y))
        Next 'y
    Next 'x
    For x = 1 to LineCount
        For y = 0 62
        MonitorIDColumn = CRSFile2DArray(x,0)
数组 vb.net

评论

3赞 Étienne Laneville 6/22/2023
代码的某些部分丢失。例如,未在您发布的代码中的任何位置定义。LineCount
1赞 Hursey 6/22/2023
为什么要读取文件两次?肯定调用 readalllines,它返回一个字符串数组,您可以迭代以然后拆分内容?还有很多第三方工具(检查 nugets)使处理 csv 文件变得非常简单
3赞 djv 6/22/2023
“我做错了什么???????”缺少双引号,表达式未分配给任何内容,缩进,大写和间距不正确(您实际上在IDE中是否有此代码?),读取文件两次,使用,不处置StreamReader,...发布一些首先编译的代码R\TxtFile.csv"file.ReadAllLines(R\TxtFile.csv").Length -1MsgBoxFor y = 0 62

答: 暂无答案