vb.net读取Excel / Csv 文件的基本方法

 Public Shared Function getDateFromBankFile(ByRef fiArr As FileInfo()) As String

        Dim xlApp As Microsoft.Office.Interop.Excel.Application
        Dim xlWorkBook As Excel.Workbook
        Dim xlWorkSheet As Excel.Worksheet 

        xlApp = New Excel.Application
        xlWorkBook = xlApp.Workbooks.Open("C:\test.xlsx")
        xlWorkSheet = CType(xlWorkBook.Worksheets(1), Excel.Worksheet)

        '写自己处理的过程
        If (xlApp IsNot Nothing) Then
            xlWorkBook.Close()
            xlApp.Quit()

           releaseObject(xlApp)
           releaseObject(xlWorkBook)
           releaseObject(xlWorkSheet)
        End If

  End Sub

'释放内存

    Private Sub releaseObject(ByVal obj As Object)
        Try
            System.Runtime.InteropServices.Marshal.ReleaseComObject(obj)
            obj = Nothing
        Catch ex As Exception
            obj = Nothing
        Finally
            GC.Collect()
        End Try
    End Sub