マニュアル > 実践編 > データの読み込み

概要

３つの方法で値を読み込みするサンプルです。

faeng_0050

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

設定

タグ設定

1.タグ「U01.F01.T01」「U01.F01.T02」「U01.F02.T01」を設定します。
faeng_0049

プログラム

読み込み処理を記述します。

●VB.Net

'読み込み１

Private Sub AxEng1_ValueChanged(ByVal sender As Object,

ByVal e As AxFAENGINELib6._DFAEngineEvents_ValueChangedEvent)

Handles AxEng1.ValueChanged

Select Case e.tagPath

Case "U01.F01.T01"

txtRead1.Text = CStr(e.value)

End Select

End Sub

'読み込み２

Private Sub btnRead2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Handles btnRead2.Click

txtRead2.Text = CStr(AxEng1.GetVal("U01.F01.T02"))

End Sub

'読み込み３

Private Sub btnRead3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Handles btnRead3.Click

Dim a As Object = Nothing

If AxEng1.ReadVal("U01.F02.T01", a) Then

txtRead3.Text = CStr(a)

Else

txtError.Text = CStr(AxEng1.ErrCode) & ":" & AxEng1.ErrMessage

End If

End Sub

解説

このサンプルのポイントは、自動更新が必要なタグとそれ以外のタグを、２つのフォルダで別々に管理している点です。モニタリング及びGetValではキャッシュの自動更新が必要ですが、ReadValは自動更新が不要です。そこで、自動更新有りフォルダ「F01」及び自動更新無しフォルダ「F02」を作成し、それぞれにタグを分けて登録しています。結果として無駄な通信が発生しません。

自動更新有りフォルダ「F01」	自動更新無しフォルダ「F02」
U01.F01.T01 / U01.F01.T02	U01.F02.T01