次轴融合图的最大值vb.net

我有两个数据集。一个表示为2D 100%压缩列，另一个表示为直线。 2D列位于主Y轴上，折线图位于次Y轴上。主Y轴和次Y轴最大值不匹配。这导致位于不正确位置的线图wrt变为柱图

柱状图有值[（60,40），（70,30）]。折线图的值为[30,40]。所以这里的线图看起来比柱图高

    Sub createWeeklyGraph_stack()
    'Create an XML data document in a string variable

    Dim strXML As String = ""
    strXML = strXML & "<chart caption='Weekly Order Booking Efficiency' xaxisName='YearMonths' pyaxisname='Orders booked in percentage' syaxisname='I2 Confirmed without Amendment' showplotborder='1' palette='2' showborder='0'>"

    For i As Integer = 0 To ds_week.Rows.Count - 1
        Dim weekno1 As String = ds_week.Rows(i).Item(0).ToString()
        Dim mon1 As String = ds_week.Rows(i).Item(1).ToString()
        Dim Confirmedbyi21 As String = ds_week.Rows(i).Item(3).ToString()
        Dim Confirmedbypass1 As String = ds_week.Rows(i).Item(4).ToString()
        Dim Amended1 As String = ds_week.Rows(i).Item(5).ToString()
        Dim Amended_n1 As String = ds_week.Rows(i).Item(6).ToString()
    Next

    strXML = strXML & "<categories>"
    For i As Integer = 0 To ds_week.Rows.Count - 1
        strXML = strXML & "<category label='" & ds_week.Rows(i).Item(0).ToString & "'/>"
    Next
    strXML = strXML & "</categories>"

    strXML = strXML & "<dataset seriesName='I2' color='FFFF00'>"
    For i As Integer = 0 To ds_week.Rows.Count - 1
        strXML = strXML & "<set value= '" & ds_week.Rows(i).Item(3).ToString & "'/>"
    Next
    strXML = strXML & "</dataset>"

    strXML = strXML & "<dataset seriesName='Amend' color='FF0000'>"
    For i As Integer = 0 To ds_week.Rows.Count - 1
        strXML = strXML & "<set value= '" & ds_week.Rows(i).Item(5).ToString & "'/>"
    Next
    strXML = strXML & "</dataset>"

    strXML = strXML & "<dataset seriesName='Bypass' color='9ACCF6'>"
    For i As Integer = 0 To ds_week.Rows.Count - 1
        strXML = strXML & "<set value= '" & ds_week.Rows(i).Item(4).ToString & "'/>"
    Next
    strXML = strXML & "</dataset>"

    strXML = strXML & "<dataset seriesname='I2 Confirmed without Amendment' parentyaxis='S' linethickness='4' showvalues='0' renderas='Line' color='4B0082'>"
    For i As Integer = 0 To ds_week.Rows.Count - 1
        strXML = strXML & "<set value= '" & ds_week.Rows(i).Item(6).ToString & "'/>"
    Next

    strXML = strXML & "</dataset>"
    strXML = strXML & " <styles> "
    strXML = strXML & "<definition>"
    strXML = strXML & "<style type='font' name='CaptionFont' bold='1' color='666666' size='17' />"
    strXML = strXML & "<style type='font' name='SubCaptionFont' bold='1' />"
    strXML = strXML & "</definition>"
    strXML = strXML & "<application>"
    strXML = strXML & " <apply toObject='caption' styles='CaptionFont' />"
    strXML = strXML & " <apply toObject='SubCaption' styles='SubCaptionFont' />"
    strXML = strXML & "</application>"
    strXML = strXML & "</styles></chart>"

    'Create the chart - Stacked Column 3D Chart with data from strXML variable using dataXML method
    Dim str As String = FusionCharts.RenderChartHTML("FusionCharts1\StackedColumn3DLineDY.swf", "", strXML, "New1", "1200", "300", False)

    Literal1.Text = str
    Literal1.Visible = True
End Sub

Sub-createWeeklyGraph_stack（）
'在字符串变量中创建XML数据文档
Dim strXML As String=“”
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
Dim weekno1作为String=ds_week.Rows（i）.Item（0）.ToString（）
Dim mon1作为字符串=ds_week.Rows（i）.Item（1）.ToString（）
Dim Confirmedbyi21作为字符串=ds_week.Rows（i）.Item（3）.ToString（）
Dim Confirmedbypass1 As String=ds_week.Rows（i）.Item（4）.ToString（）
Dim修正1为String=ds_week.Rows（i）.Item（5）.ToString（）
Dim修改为String=ds_week.Rows（i）.Item（6）.ToString（）
下一个
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
strXML=strXML&“
下一个
strXML=strXML&“
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
strXML=strXML&“
下一个
strXML=strXML&“
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
strXML=strXML&“
下一个
strXML=strXML&“
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
strXML=strXML&“
下一个
strXML=strXML&“
strXML=strXML&“
对于i As Integer=0到ds_week.Rows.Count-1
strXML=strXML&“
下一个
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
strXML=strXML&“
'使用dataXML方法使用strXML变量中的数据创建图表-堆叠柱3D图表
Dim str As String=FusionCharts.RenderChartHTML（“FusionCharts1\StackedColumn3DLineDY.swf”，“strXML”，“New1”，“1200”，“300”，False）
Literal1.Text=str
Literal1.Visible=True
端接头

---

我要做的就是使次Y轴的最大值为100或定义次Y轴中的间隔。这样两个Y轴就可以互相同步了。

添加以下语法会有所帮助。然后施了魔法

 PYAxisMaxValue='110' SYAxisMaxValue='110' syncAxisLimits='1' 

全图起跑线

strXML = strXML & "<chart caption='Order Booking Efficiency' xaxisName='YearMonths' pyaxisname='Orders booked in percentage' syaxisname='Amendment NonSystem in percentage' PYAxisMaxValue='110' SYAxisMaxValue='110' syncAxisLimits='1' showplotborder='1' palette='2' showborder='0' >"

strXML=strXML&“