ByteScout Spreadsheet SDK – VB.NET – Import From 2D Array

Home
/
Articles
/
ByteScout Spreadsheet SDK – VB.NET – Import From 2D Array

printable version:
ByteScout-Spreadsheet-SDK-VB-NET-Import-From-2D-Array.pdf

How to import from 2d array in VB.NET and ByteScout Spreadsheet SDK

This tutorial will show how to import from 2d array in VB.NET

With this source code sample you may quickly learn how to import from 2d array in VB.NET. What is ByteScout Spreadsheet SDK? It is the SDK to create, read, modify and calculate spreadsheets. Formula calculations are supported, import and export to and from JSON, CSV, XML, databases, arrays. It can help you to import from 2d array in your VB.NET application.

You will save a lot of time on writing and testing code as you may just take the VB.NET code from ByteScout Spreadsheet SDK for import from 2d array below and use it in your application. Follow the instructions from the scratch to work and copy the VB.NET code. Test VB.NET sample code examples whether they respond your needs and requirements for the project.

Our website provides trial version of ByteScout Spreadsheet SDK for free. It also includes documentation and source code samples.

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

      Imports System.IO
Imports System.Diagnostics
Imports Bytescout.Spreadsheet

Module Module1

    Sub Main()

        Const fileName As String = "VBNetImportFrom2DArray.xls"

        'Create a new spreadsheet
        Dim spreadsheet As Bytescout.Spreadsheet.Spreadsheet = New Bytescout.Spreadsheet.Spreadsheet
        
        'Get the data from the 2D array that we want to import
        Dim stockPrices(,) As String = Get2DArray()

        'Import data into spreadheet
        spreadsheet.ImportFrom2DArray(stockPrices)

        'Save the spreadsheet
        If (File.Exists(fileName)) Then
            File.Delete(fileName)
        End If
        spreadsheet.SaveAs(fileName)

        'Close spreadsheet
        spreadsheet.Close()

        'Open the spreadsheet
        Process.Start(fileName)

    End Sub

    ''' <summary>
    ''' Creates a 2D array of stock prices
    ''' </summary>
    ''' <returns>A 2D array of stock prices</returns>
    Function Get2DArray() As String(,)

        Dim stockPrices(10, 2) As String

        stockPrices(0, 0) = "AAPL"
        stockPrices(0, 1) = "24,89"

        stockPrices(1, 0) = "AMZN"
        stockPrices(1, 1) = "27,95"

        stockPrices(2, 0) = "DELL"
        stockPrices(2, 1) = "12,68"

        stockPrices(3, 0) = "EBAY"
        stockPrices(3, 1) = "57,27"

        stockPrices(4, 0) = "GOOG"
        stockPrices(4, 1) = "28,98"

        stockPrices(5, 0) = "IBM "
        stockPrices(5, 1) = "24,00"
        stockPrices(6, 0) = "INTC"
        stockPrices(6, 1) = "12,24"
        stockPrices(7, 0) = "MSFT"
        stockPrices(7, 1) = "37,85"
        stockPrices(8, 0) = "SNE "
        stockPrices(8, 1) = "39,91"
        stockPrices(9, 0) = "YHOO"
        stockPrices(9, 1) = "78,72"

        Return stockPrices
    End Function


End Module