Dim i As Integer
Dim Chart As WinForm.Chart = e.Form.Controls("Chart1")
Dim C1Cha As C1.Win.C1Chart.C1Chart = Chart.BaseControl
Dim Series As WinForm.ChartSeries
Chart.VisualEffect = True
'Chart.ChartType = ChartTypeEnum.Bar
Chart.ChartType = ChartTypeEnum.XYPlot
chart1.Parent = pictureBoxBackground '
报错提示chart1被保护不能访问，如何处理？
chart1.Series.Clear()
Dim series As New Series("MySeries")
chart1.Series.Add(series)
series.ChartType = SeriesChartType.Line '
For i As Integer = 0 To 9
series.Points.AddXY(i, i + Rand.Next(5))
Next
加好友 
发短信
Post By：2024/3/12 9:45:00 [只看该作者]
