效果动画演示
实现步骤
第一步:新建窗口,分别拖拽计数器、重量0,1,2,3 和 限定线最大值、最小值
第二步:分别创建变量字典
第三步 :通过 用户程序==>时间程序==>模拟产生变量值
脚本内容如下:
Var.计数器=Var.计数器+3
Var.称重重量0=Rnd()*3+Var.称重重量0
Var.称重重量1=Rnd()*6+Var.称重重量1
Var.称重重量2=Rnd()*9+Var.称重重量2
Var.称重重量3=Rnd()*12+Var.称重重量3
If Var.称重重量0>=100 then
Var.称重重量0=0
End If
If Var.称重重量1>=100 then
Var.称重重量1=0
End If
If Var.称重重量2>=100 then
Var.称重重量2=0
End If
If Var.称重重量3>=100 then
Var.称重重量3=0
End If
第三步:选中“自定义曲线”控件,设定属性“横轴”,“纵轴”,“集合”
第四步:给按钮“同时加载四条曲线”添加事件 通过脚本给“自定义曲线”绑定XY值
Call 自定义曲线0.SetPeroidRefreshTime(1000)
Call 自定义曲线0.StartSeries()
Call 自定义曲线0.SetActiveSeriesNo(0)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量0",1)
Call 自定义曲线0.RealTimeXYPoint(0,10,0,100)
Call 自定义曲线0.SetActiveSeriesNo(1)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量1",1)
Call 自定义曲线0.RealTimeXYPoint(1,10,0,100)
Call 自定义曲线0.SetActiveSeriesNo(2)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量2",1)
Call 自定义曲线0.RealTimeXYPoint(2,10,0,100)
Call 自定义曲线0.SetActiveSeriesNo(3)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量3",1)
Call 自定义曲线0.RealTimeXYPoint(3,10,0,100)
MsgBox "开始刷新"