ByteScout Barcode Suite - VB.NET - Add surface chart with spreadsheet sdk - ByteScout

ByteScout Barcode Suite – VB.NET – Add surface chart with spreadsheet sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Barcode Suite – VB.NET – Add surface chart with spreadsheet sdk

How to add surface chart with spreadsheet sdk in VB.NET with ByteScout Barcode Suite

Learn to code in VB.NET to add surface chart with spreadsheet sdk with this step-by-step tutorial

Sample source code below will display you how to manage a complex task like add surface chart with spreadsheet sdk in VB.NET. ByteScout Barcode Suite: the set that includes three different SDK products to generate barcodes, read barcodes and read and write spreadsheets: Barcode SDK, Barcode Reader SDK and Spreadsheet SDK. It can add surface chart with spreadsheet sdk in VB.NET.

The following code snippet for ByteScout Barcode Suite works best when you need to quickly add surface chart with spreadsheet sdk in your VB.NET application. Just copy and paste the code into your VB.NET application’s code and follow the instructions. Further improvement of the code will make it more robust.

The trial version of ByteScout Barcode Suite can be downloaded for free from our website. It also includes source code samples for VB.NET and other programming languages.

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 Bytescout.Spreadsheet Imports Bytescout.Spreadsheet.Charts Module Module1 Sub Main() ' Create new Spreadsheet object Dim spreadsheet As New Spreadsheet() spreadsheet.RegistrationName = "demo" spreadsheet.RegistrationKey = "demo" ' Add new worksheet Dim sheet As Worksheet = spreadsheet.Workbook.Worksheets.Add("Sample") ' Add a data for Surface chart Dim count As Integer = 10 Dim [step] As Double = 2 * Math.PI / (count - 1) For i As Integer = 0 To count - 1 For j As Integer = 0 To count - 1 sheet(i, j).Value = Math.Sin([step] * Math.Sqrt(i * i + j * j)) Next Next ' Add charts to worksheet Dim surfaceChart As Chart = sheet.Charts.AddChartAndFitInto(11, 1, 28, 8, ChartType.Surface) For i As Integer = 0 To count - 1 surfaceChart.SeriesCollection.Add(New Series(sheet.Range(0, i, 9, i))) Next surfaceChart = sheet.Charts.AddChartAndFitInto(11, 10, 28, 17, ChartType.SurfaceWireframe) For i As Integer = 0 To count - 1 surfaceChart.SeriesCollection.Add(New Series(sheet.Range(0, i, 9, i))) Next surfaceChart = sheet.Charts.AddChartAndFitInto(29, 1, 46, 8, ChartType.SurfaceTopView) For i As Integer = 0 To count - 1 surfaceChart.SeriesCollection.Add(New Series(sheet.Range(0, i, 9, i))) Next surfaceChart = sheet.Charts.AddChartAndFitInto(29, 10, 46, 17, ChartType.SurfaceTopViewWireframe) For i As Integer = 0 To count - 1 surfaceChart.SeriesCollection.Add(New Series(sheet.Range(0, i, 9, i))) Next ' Save it as XLS spreadsheet.SaveAs("Output.xls") ' Close the document spreadsheet.Close() ' Cleanup spreadsheet.Dispose() ' Open generated XLS file in default associated application Process.Start("Output.xls") End Sub End Module

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Barcode Suite Home Page

Explore ByteScout Barcode Suite Documentation

Explore Samples

Sign Up for ByteScout Barcode Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Barcode Suite Home Page

Explore ByteScout Barcode Suite Documentation

Explore Samples

Sign Up for ByteScout Barcode Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next