如何通过ADODB读取csv文件中的第一行的数据

[blue30000]

有一个帖子：在csv文件中，默认的第一行是表头信息。但是如果第一行的不是表头，而直接是数据，应该如何处理？

看到这个问题，时间已久远，回答一下

'在csv文件中，默认的第一行是表头信息,所以定义接收数组，一定要加一行

假设已经获取到csvRS:

RowSum = csvRS.RecordCount
ColSum = csvRS.Fields.Count

    '在csv文件中，默认的第一行是表头信息,所以接收数组一定要加一行
    ReDim outArr(RowSum + 1, ColSum)  
    '第一行赋值， Fields.item(j).Name
    For j = 0 To ColSum - 1
        If Not IsNull(csvRS.Fields(j)) Then
            outArr(1, j + 1) = csvRS.Fields.item(j).Name
        End If
    Next j
    '在csv文件中，默认的第一行是表头信息,第2行开始
    i = 2
    Do While Not csvRS.EOF
        For j = 0 To ColSum - 1
            If Not IsNull(csvRS.Fields(j)) Then
                outArr(i, j + 1) = csvRS.Fields(j).Value
            End If
        Next j
        csvRS.MoveNext
        i = i + 1
    Loop

[CSDN-Ada助手]

您可以前往 CSDN问答-Python 发布问题, 以便更快地解决您的疑问