H
Hazem
I am trying to use OWC10 for the first time I hope you have the time to help
me out or at least direct me to a web site that might have full documentation.
I am simply trying to plot two function Y=x and Y=x^2 on the same chart.
Here is what I have so far, the name of the form is Quench and the name of
the control on the form is AxChart2
Dim Y1(10) As Double
Dim X1(10) As Double
Dim Y2(10) As Double
Dim X2(10) As Double
For J = 1 To 10
X1(J) = J
Y1(J) = J
X2(J) = J
Y2(J) = J ^ 2
Next
Quench.AxChart2.Visible = True
Quench.AxChart2.Charts.Add(0)
Quench.AxChart2.HasChartSpaceLegend = True
Quench.AxChart2.Charts(0).Type =
OWC10.ChartChartTypeEnum.chChartTypeScatterSmoothLineMarkers
Quench.AxChart2.HasChartSpaceTitle = True
Quench.AxChart2.ChartSpaceTitle.Caption = "Quench Tower Cooling Curve"
Quench.AxChart2.Charts(0).Axes(0).HasTitle = True
Quench.AxChart2.Charts(0).Axes(1).HasTitle = True
Quench.AxChart2.Charts(0).Axes(0).Title.Caption = "Temperature"
Quench.AxChart2.Charts(0).Axes(1).Title.Caption = "Heat Duty"
Quench.AxChart2.Charts(0).SetData(OWC10.ChartDimensionsEnum.chDimSeriesNames, -1, "Cooling Curve")
‘ How Do I plot Y1 vs X1 and Y2 vs X2 everything I tried gave errors or did
not work
Thanks in advance
Hazem
me out or at least direct me to a web site that might have full documentation.
I am simply trying to plot two function Y=x and Y=x^2 on the same chart.
Here is what I have so far, the name of the form is Quench and the name of
the control on the form is AxChart2
Dim Y1(10) As Double
Dim X1(10) As Double
Dim Y2(10) As Double
Dim X2(10) As Double
For J = 1 To 10
X1(J) = J
Y1(J) = J
X2(J) = J
Y2(J) = J ^ 2
Next
Quench.AxChart2.Visible = True
Quench.AxChart2.Charts.Add(0)
Quench.AxChart2.HasChartSpaceLegend = True
Quench.AxChart2.Charts(0).Type =
OWC10.ChartChartTypeEnum.chChartTypeScatterSmoothLineMarkers
Quench.AxChart2.HasChartSpaceTitle = True
Quench.AxChart2.ChartSpaceTitle.Caption = "Quench Tower Cooling Curve"
Quench.AxChart2.Charts(0).Axes(0).HasTitle = True
Quench.AxChart2.Charts(0).Axes(1).HasTitle = True
Quench.AxChart2.Charts(0).Axes(0).Title.Caption = "Temperature"
Quench.AxChart2.Charts(0).Axes(1).Title.Caption = "Heat Duty"
Quench.AxChart2.Charts(0).SetData(OWC10.ChartDimensionsEnum.chDimSeriesNames, -1, "Cooling Curve")
‘ How Do I plot Y1 vs X1 and Y2 vs X2 everything I tried gave errors or did
not work
Thanks in advance
Hazem