ByteScout Spreadsheet SDK – VB.NET – Export To DataSet

Home
/
Articles
/
ByteScout Spreadsheet SDK – VB.NET – Export To DataSet

printable version:
ByteScout-Spreadsheet-SDK-VB-NET-Export-To-DataSet.pdf

How to export to dataset in VB.NET using ByteScout Spreadsheet SDK

This tutorial will show how to export to dataset in VB.NET

With this source code sample you may quickly learn how to export to dataset in VB.NET. Want to export to dataset in your VB.NET app? ByteScout Spreadsheet SDK is designed for it. ByteScout Spreadsheet SDK is the library (SDK) that is capable of writing, reading, modifying and calculating Excel and CSV spreadsheets. Most popular formulas can be calculated and reculculated with Excel installed. You may import or export data to and from CSV, XML, JSON as well as to and from databases, arrays.

VB.NET code samples for VB.NET developers help to speed up coding of your application when using ByteScout Spreadsheet SDK. Follow the instructions from the scratch to work and copy the VB.NET code. Use of ByteScout Spreadsheet SDK in VB.NET is also explained in the documentation included along with the product.

Free trial version of ByteScout Spreadsheet SDK is available for download from our website. Get it to try other source code samples for VB.NET.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Module Module1

    Sub Main()
        Dim inputFile As String = "PeriodicTableOfElementsSpreadsheet.xls"

        'Open and load spreadsheet
        Dim spreadsheet = New Spreadsheet()
        spreadsheet.LoadFromFile(inputFile)

        'Get the data from the spreadsheet
        Dim ds As DataSet = spreadsheet.ExportToDataSet()

        'Close spreadsheet
        spreadsheet.Close()

        'Display data in first datatable of dataset
        Dim dt As DataTable = ds.Tables(0)
        Console.WriteLine("Displaying contents of first datatable")
        For i As Integer = 0 To dt.Rows.Count - 1
            For j As Integer = 0 To dt.Columns.Count - 1

                Console.Write(dt.Rows(i)(j) + " ")
            Next
            Console.WriteLine()
        Next

        'Pause
        Console.ReadLine()
    End Sub

End Module