Jobs
Author: Julito Amodia Date Submitted: 5/13/2006 Category: Forms Compatibility: VB 6 This code has been accessed 4204 times.
Email Yourself this snippet:
'Julito Amodia 'Change Label on MSChart using array Dim arrValues(1 to 5, 1 to 3) Dim i as Integer
Code
For i = 1 to 5 arrValues(i, 1) = "Amodia" & i ' Labels arrValues(i, 2) = 0 + i ' Series 1 values. arrValues(i, 3) = 2 * i ' Series 2 values. Next i MsChart1.ChartData = arrValues
