モニタリング

<< Click to Display Table of Contents >>

マニュアル > 実践編 >

モニタリング

概要

32点のデータをリアルタイムにモニタリングするサンプルです。

 

faeng_0043

 

このサンプルは以下に格納されています。

 

 

設定

タグ設定
 

1.タグ「T00」~「T31」を設定します。
faeng_0044

 

 

プログラム

値変化イベントを記述します。

 

●VB.Net

Private Sub AxEng1_ValueStateChanged(ByVal sender As Object,

                         ByVal e As AxFAENGINELib6._DFAEngineEvents_ValueStateChangedEvent)

                         Handles AxEng1.ValueStateChanged

 If e.state Then

         '正常時

         txtVal( Integer.Parse(e.tagPath.Substring(e.tagPath.Length - 2))).Text = CStr(e.value)

 Else

         '異常時

         txtVal(Integer.Parse(e.tagPath.Substring(e.tagPath.Length - 2))).Text = "Error!"

 End If

 

End Sub

 

 

hint

更新周期はフォルダのプロパティで設定します。

faeng_0045

 

 

解説

 

faeng_0046

 

プログラムを実行すると、値が変化するたびにValueStateChangedイベントが呼び出されます。PLCとの通信ができない状態の場合、ValueStateChangedイベントのState引数がFALSEになります。