Learn how to add doughnut chart in VB.NET with this source code sample. ByteScout Spreadsheet SDK is the SDK that can write and read, modify and calculate Excel and CSV spreadsheets. Most popular formulas are supported. You may import or export data to and from CSV, XML, JSON as well as to and from databases, arrays. It can be used to add doughnut chart using VB.NET.
Fast application programming interfaces of ByteScout Spreadsheet SDK for VB.NET plus the instruction and the code below will help you quickly learn how to add doughnut chart. Just copy and paste the code into your VB.NET application’s code and follow the instruction. Test VB.NET sample code examples whether they respond your needs and requirements for the project.
Trial version of ByteScout Spreadsheet SDK can be downloaded for free from our website. It also includes source code samples for VB.NET and other programming languages.
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 few random numbers Dim length As Integer = 10 Dim rnd As New Random() For i As Integer = 0 To length - 1 sheet.Cell(i, 0).Value = rnd.[Next](10) sheet.Cell(i, 1).Value = rnd.[Next](10) Next ' Add charts to worksheet Dim doughnutChart As Chart = sheet.Charts.AddChartAndFitInto(12, 1, 35, 9, ChartType.Doughnut) doughnutChart.SeriesCollection.Add(New Series(sheet.Range(0, 0, length - 1, 0))) doughnutChart.SeriesCollection.Add(New Series(sheet.Range(0, 1, length - 1, 1))) doughnutChart = sheet.Charts.AddChartAndFitInto(12, 10, 35, 18, ChartType.DoughnutExploded) doughnutChart.SeriesCollection.Add(New Series(sheet.Range(0, 0, length - 1, 0))) doughnutChart.SeriesCollection.Add(New Series(sheet.Range(0, 1, length - 1, 1))) ' 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