主题：excel 列号

1、需要循环所有的列，判断，知识点

Dim Book As New XLS.Book("d:\test.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For i As Integer = 0 To sheet.cols.count-1
    output.show(sheet(0, i).text)
    If sheet(0, i).text = "金额" Then
        msgbox(i)
        Exit For
    End If
Next

2、-1或者-2没有太大区别，有可能最后一行是回车，所以最后一行无效。

csv文件本身问题吧，是否带双引号，是随机的。