Wrox Home  
Search P2P Archive for: Go

  Return to Index  

pro_vb thread: RE: MsChart Control


Message #1 by William Crawley <william.crawley@u...> on Fri, 28 Jun 2002 09:00:38 +0100 (BST)
Hi All,

i have the following code that pops a pie chart. The chart itself is fine 
however I keep getting C1 as the columnlabel above the pie chart. No 
matter if I set it to blank in the Properties at designtime or do somthing 
as below. How do I get rid of this annoying value.

Dim arrValues(1 To 2, 1 To 2)
objRs.MoveFirst
Do Until objRs.EOF
If objRs.Fields(1).Value = True Then
arrValues(1, 2) = arrValues(1, 2) + 1 ' 0 + 1 ' Series 1 values.
arrValues(1, 1) = "Pass "
Else
arrValues(2, 2) = arrValues(2, 2) + 1 '2 * i ' Series 2 values.
arrValues(2, 1) = "fail "
End If
objRs.MoveNext
Loop
MSChart1.ColumnLabel = "Pass/Fail Rate"
MSChart1.ChartData = arrValues
MSChart1.Refresh

regards
Bill crawley

  Return to Index