E
Eric Zhao
I have a OWC10 line chart.
The categories are a, b, c, d and the values are 5, 10, 15 and 25. The
chart works fine. However, the real world data for categories are b, b, b,
b. When it is ploted, it only show the first spot (b,5). I was expecting to
see a vertical line.
Please help!
Below is my sample code:
<HTML>
<BODY>
<OBJECT CLASSID="clsid:0002E500-0000-0000-C000-000000000046"
id=ChartSpace1></OBJECT>
<script language=vbscript>
Option Explicit
Sub Window_onLoad()
Dim c, oChart, oSer1
Set c = ChartSpace1.Constants
Set oChart = ChartSpace1.Charts.Add
oChart.Type = c.chChartTypeLineMarkers
oChart.HasLegend = True
Set oSer1 = oChart.SeriesCollection.Add '"d" is omitted for this series.
oSer1.SetData c.chDimSeriesNames, c.chDataLiteral, "Series #1"
oSer1.SetData c.chDimValues, c.chDataLiteral, Array(5, 10, 15, 25)
'oSer1.SetData c.chDimCategories, c.chDataLiteral, Array("a", "b", "c",
"d")
'comment out previous line, and un-comment the next line
'I was expect to see a verticle line at point b from 5 to 25
oSer1.SetData c.chDimCategories, c.chDataLiteral, Array("b", "b", "b",
"b")
End Sub
</script>
</BODY>
</HTML>
The categories are a, b, c, d and the values are 5, 10, 15 and 25. The
chart works fine. However, the real world data for categories are b, b, b,
b. When it is ploted, it only show the first spot (b,5). I was expecting to
see a vertical line.
Please help!
Below is my sample code:
<HTML>
<BODY>
<OBJECT CLASSID="clsid:0002E500-0000-0000-C000-000000000046"
id=ChartSpace1></OBJECT>
<script language=vbscript>
Option Explicit
Sub Window_onLoad()
Dim c, oChart, oSer1
Set c = ChartSpace1.Constants
Set oChart = ChartSpace1.Charts.Add
oChart.Type = c.chChartTypeLineMarkers
oChart.HasLegend = True
Set oSer1 = oChart.SeriesCollection.Add '"d" is omitted for this series.
oSer1.SetData c.chDimSeriesNames, c.chDataLiteral, "Series #1"
oSer1.SetData c.chDimValues, c.chDataLiteral, Array(5, 10, 15, 25)
'oSer1.SetData c.chDimCategories, c.chDataLiteral, Array("a", "b", "c",
"d")
'comment out previous line, and un-comment the next line
'I was expect to see a verticle line at point b from 5 to 25
oSer1.SetData c.chDimCategories, c.chDataLiteral, Array("b", "b", "b",
"b")
End Sub
</script>
</BODY>
</HTML>