OWC 实现 叠加 柱状图

解决了一个小问题 ，发现baidu上还没有，分享一下

问题：

用owc11控件在winform上画柱状图，但是我不知道怎么在同一个柱上显示不同的叠加,意思是我需要不同的数值,显示在同一柱子上但是用不同的颜色区分.例如,a=10,b=20.我希望有一根柱子显示这两个值,下面是10,上面是20,总值30,10和20用不同颜色表示,但是在同一柱子上.有没有人能给个例子.

解决方案:

 Private Sub showPoleChart()
        Dim strCategory As String = "H1" & vbTab & "H2" & vbTab
        Dim strValue As String = "10" & vbTab & "8" & vbTab & vbCrLf & "10" & vbTab & "11" & vbTab
        Dim strValue2 As String = "20" & vbTab & "3" & vbTab & vbCrLf & "10" & vbTab & "11" & vbTab

 

        Dim oPoleChart As  ChChart
        Dim oChartSerials As ChSeries

        Dim oChartSerials1 As ChSeries

        With Me.AxChartSpace1

            oPoleChart = .Charts.Add()

            With oPoleChart
                .SetData(ChartDimensionsEnum.chDimCategories, ChartSpecialDataSourcesEnum.chDataLiteral.GetHashCode(), strCategory)
                .Type = ChartChartTypeEnum.chChartTypeColumnStacked
                oChartSerials = .SeriesCollection().Add()

                With oChartSerials
                    .SetData(ChartDimensionsEnum.chDimValues, ChartSpecialDataSourcesEnum.chDataLiteral.GetHashCode(), strValue)

                End With

                oChartSerials1 = .SeriesCollection().Add()
                With oChartSerials1
                    .SetData(ChartDimensionsEnum.chDimValues, ChartSpecialDataSourcesEnum.chDataLiteral.GetHashCode(), strValue2)
                End With
            End With

        End With