Excel .NET组件Spire.XLS教程：在 Excel 中创建气泡图表

*这么优秀的国产工具怎能错过呢！在线下单专享“一口价”，低至4579元起，立即购买！想要获取更多福利的朋友可以咨询在线客服哦~

在 Excel 中创建气泡图表

前面我们介绍了如何使用Spire.XLS 创建散点图表，该文将介绍如何使用C#、VB.NET创建Excel气泡图表。

C#

using Spire.Xls;namespace BubbleChart{    class Program    {        static void Main(string[] args)        {            //创建工作簿            Workbook workbook = new Workbook();            //添加工作表并设置名称            workbook.CreateEmptySheets(1);            Worksheet sheet = workbook.Worksheets[0];            sheet.Name = "Sample";            //创建气泡图表            Chart chart = sheet.Charts.Add(ExcelChartType.Bubble);            //指定图表所在位置            chart.LeftColumn = 1;            chart.RightColumn = 10;            chart.TopRow = 1;            chart.BottomRow = 20;            //设置图表的名称和数据            Spire.Xls.Charts.ChartSerie cs1 = chart.Series.Add("气泡图表");            cs1.EnteredDirectlyValues = new object[] { 2.2, 5.6 };            cs1.EnteredDirectlyCategoryLabels = new object[] { 1.1, 4.4 };            cs1.EnteredDirectlyBubbles = new object[] { 3, 6 };            //文档保存            workbook.SaveToFile("Output.xlsx", ExcelVersion.Version2010);        }    } }

VB.NET

Imports Spire.XlsNamespace BubbleChart     Class Program        Private Shared Sub Main(ByVal args() As String)            '创建工作簿            Dim workbook As Workbook = New Workbook            '添加工作表并设置名称            workbook.CreateEmptySheets(1)            Dim sheet As Worksheet = workbook.Worksheets(0)            sheet.Name = "Chart data"            '创建气泡图表            Dim chart As Chart = sheet.Charts.Add(ExcelChartType.Bubble)            '指定图表所在位置            chart.LeftColumn = 1            chart.RightColumn = 10            chart.TopRow = 1            chart.BottomRow = 20            '设置图表的名称和数据            Dim cs1 As Spire.Xls.Charts.ChartSerie = chart.Series.Add("气泡图表")            cs1.EnteredDirectlyValues = New Object() {2.2, 5.6}            cs1.EnteredDirectlyCategoryLabels = New Object() {1.1, 4.4}            cs1.EnteredDirectlyBubbles = New Object() {3, 6}            '文档保存            workbook.SaveToFile("Output.xlsx", ExcelVersion.Version2010)        End Sub    End ClassEnd Namespace

生成结果：