vb.net读取cvs vbs 读取文件( 二 )


Dim Str As String
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
Str = OpenFileDialog1.FileName
End If
Dim oExcel As New Excel.Application
Dim oWorkBook As Excel.Workbook
Dim oWorkSheet As Excel.Worksheet
oWorkBook = oExcel.Workbooks.Open(Str)
oWorkSheet = oWorkBook.Worksheets(1)
For i = 1 To 50这里我暂时读取了50行,因为我不知道如何判断读到最后一行
MsgBox(oWorkSheet.Cells(i, 1).valueoWorkSheet.Cells(i, 2).valueoWorkSheet.Cells(i, 3).value)
Next
oWorkBook.Close()
oWorkBook = Nothing
oExcel.Quit()
oExcel = Nothing
你csv文件是用什么分割符的?
把csv文件当做文本文件处理
File.ReadAllLines 读取所有行,
然后循环每行 , 按照分隔符split后就是每一列
【vb.net读取cvs vbs 读取文件】关于vb.net读取cvs和vbs 读取文件的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读