I am trying to pass two arrays from a sub in a VB6 basic module to a sub in the code section of a form that contains an MSChart control. Each array repesents a line and contains two columns for the X and Y points.
In the code section of the form that is to receive the arrays, I tried something like this:
In the basic module where the arrays are created and sent from, I tried something like this:
How can I make this work?
In the code section of the form that is to receive the arrays, I tried something like this:
Code:
Sub MakeDRchart(ChartPointsAc(), ChartPointsRe())
Dim NfixedK as Long
NFixedK = ubound(ChartPointsAc,1)
For J = i To NfixedK
Debug.Print J, ChartPointsAc(J,1)
Next
End SubCode:
Dim ChartPointsAc() As Double
Dim ChartPointsRe() As Double
ReDim ChartPointsAc(1 To nfixedk)
ReDim ChartPointsRe(1 To nfixedk)
Call MakeDRchart(ChartPointsAc(), ChartPointsRe())
