点击按钮,使“图表”生成100个数据点(其它都正常,代码就不列出了),如下代码。
现在问题是生成的不是最新的数据,是最早的数据
也就是生成的是序号最小的100位,我希望生成序号最大的100位
谢谢
Series.Length = 100 '新增图系包括10个数据点
改为遍历
Dim Chart As WinForm.Chart'定义一个图表变量
Dim Series As Winform.ChartSeries'定义一个图表变量
Chart=Forms("100批次").Controls("Chart2")
Chart.AxisY.Min=0'最小值0
Chart.AxisY.Max=10'最小值10
Chart.SeriesList.Clear()'清除图表原有的图系
Series=Chart.SeriesList.Add()'新增一个图系
Series.LineColor = Color.black'线条黑色
Series.MarkColor = Color.black'圆点黑色
Series.Length = 100
dim drs as list(of datarow) = datatables("制品管理").select("品名序号=" & tables("品名管理").current("品名序号")."排序序号列 desc")
For i As integer = 0 to drs.Count - 1 '指定每个数据点的位置
Series.X(i) = i '指定水平坐标
Series.Y(i) = drs(i)("凝胶化时间") '指定垂直坐标
Next
[此贴子已经被作者于2024/9/11 14:35:49编辑过]
提示:
编译错误:应为 标识符
错误代码:
Dim drs As List(of DataRow) = DataTables("制品管理").Select("品名序号=" & Tables("品名管理").current("品名序号")."排序序号列 desc")
Dim drs As List(Of DataRow) = DataTables("制品管理").Select("品名序号=" & Tables("品名管理").current("品名序号"), "排序序号列 desc")
提示:
指定的参数已经超出有效的范围
然后把Series.Length = 100改成1000,就可以了。
但是还没有实现我的愿望,我的愿望是:只显示100个数据
For i As integer = 0 to drs.Count - 1改为
For i As integer = 0 to 99