用vb编程，怎么将csv文件中的数据的某一列取出来（假设n行8列，我要第二列的所有数据），要一个一个取

Question

如题所述

Answer 1

CSV文件是一种常见的数据格式，其特点是通过逗号分隔数据项。要从CSV文件中提取特定列的数据，可以使用Visual Basic进行编程。下面是一个示例代码，它能够读取CSV文件的第二列数据，并将其存储在一个数组中。

在代码中，我们首先定义了变量和数组。`Dim csvfile As String`用于存储CSV文件的路径，`Dim d() As String`用于存储提取的数据。变量`i`用于计数。

打开CSV文件时，使用`Open csvfile For Input As #1`语句。通过`Do While Not EOF(1)`循环，确保我们没有读取到文件末尾。在循环内部，我们使用`ReDim Preserve d(i)`来调整数组大小，以便为新的数据项分配空间。

读取文件中的每一行数据后，使用`Line Input #1, d(i)`将数据读入数组。然后，通过`Split(d(i), ",")`函数，我们按照逗号将这行数据分割成多个部分。为了获取第二列的数据，我们使用索引`1`，因为数组索引从0开始。

如果需要去除数据中的双引号，可以添加`d(i) = Replace(d(i), """", "")`这一行代码。最后，每次读取一行后，`i`的值都会加1。

当循环结束时，我们关闭文件，并调整`i`的值，使其表示文件的实际行数。此时，数组`d`中存储的就是CSV文件第二列的所有数据。

通过这种方式，我们可以轻松地从CSV文件中提取任何特定列的数据，只需稍微调整代码中的索引即可。