04 获得趋势线的值

   在这个例子中,ProcessBook的一张趋势图上的时间戳和数值会被放入一个列表框中。一旦放入列表框,这些数据就可以为任何支持ActiveX脚本编程的应用程序所使用。
  我们用一个btn来触发。

Private Sub btn_Click()

Dim i As Long
Dim Time As Variant
Dim Value As Variant
Dim Retstat As Long

 tndPlot1.CurrentTrace = 1

 lst.Clear
 
For i = 1 To tndPlot1.TraceValuesCount
    Value =  tndPlot1.GetTraceValue(i, Time, Retstat)
     lst.AddItem (Time & "     " & Value)
Next i

End Sub

tndPlot1.GetTraceValue(i, Time, Retstat)

i ,time,retstat 都是函数的参数

几个例子举下来,也许我们都明白,无非是想办法把 value,trend数据拿到
拿到之后 就变变显示的样子

呵呵

posted on 2006-05-18 15:35  zljini  阅读(627)  评论(0编辑  收藏  举报