用Vb.net代码绘制组合图的EPPLUS问题

Dim package As New ExcelPackage()

Dim worksheet As ExcelWorksheet = package.Workbook.Worksheets.Add("Sheet1")

Dim dataRange As ExcelRange = worksheet.Cells("A1:B5")
dataRange.LoadFromArrays(New Object(,) {{"Category", "Value1"}, {"A", 10}, {"B", 20}, {"C", 30}, {"D", 40}})

Dim chart As ExcelChart = worksheet.Drawings.AddChart("Chart1", eChartType.ColumnClustered)

Dim series1 As ExcelChartSerie = chart.Series.Add(worksheet.Cells("B2:B5"), worksheet.Cells("A2:A5"))
series1.Header = "Value1"
series1.ChartType = eChartType.ColumnClustered

Dim series2 As ExcelChartSerie = chart.Series.Add(worksheet.Cells("C2:C5"), worksheet.Cells("A2:A5"))
series2.Header = "Value2"
series2.ChartType = eChartType.Line

chart.Title.Text = "Combination Chart"
chart.XAxis.Title.Text = "Category"
chart.YAxis.Title.Text = "Value"

chart.SetPosition(0, 0)
chart.SetSize(600, 400)

package.SaveAs(New FileInfo("path/to/save/file.xlsx"))