-
Feb 7th, 2025, 12:56 AM
#1
Thread Starter
Member
Pass data to a subroutine in a MSChart's form.
I have a MSChart control on a form named frmDRchart. It is addressed by a subroutine in frmDRchart named ChartIt. It currently can successfully make graphs with data generated within ChartIt.
Now I want to generate the data in subroutine TTabK4 contained in a module outside frmDRchart but inside the same frmMDI1 project. The data is a matrix with column 1 being integers for the x axis and column 2 being double precision numbers.
I have tried this:
'Create matrices for 2 lines:
'Dim ChartPointsAc() As Variant 'Dimensioned elsewhere.
'Dim ChartPointsRe() As Variant
ReDim ChartPointsAc(1 To NFIXEDK, 1 To 2)
ReDim ChartPointsRe(1 To NFIXEDK, 1 To 2)
'Add data to matrices:
For I = 1 to nfixedk
If n <= nfixedk then
ChartPointsAc(n, 1) = n 'acceptaance line.
ChartPointsAc(n, 2) = UAC 'acceptaance line.
ChartPointsRe(n, 1) = n 'rejection line.
ChartPointsRe(n, 2) = URE 'rejection line.
End If
Next
'Send data to subroutine ChartIt in frmDRchart for plotting:
If n =< nfixedk then
Set f = New frmDRchart
'send matrix for first line:
'err------> Call f.ChartIt(ChartPointsAc(), 1) 'acceptaance line.
'send matrix for second line:
Call f.ChartIt(ChartPointsRe(), 2) 'rejection line.
End If
===========================================================
'In frmDRchart.Chartit:
Private Sub ChartIt(ChartPoints As Variant, CurSeries as integer)
===========================================================
Error 438 ... procedure doesn't support this property or method
'==========================================================
Tags for this Thread
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|