Yokogawa PC-Based MX100 - Manual (Page 1078)

22-11
IM MX190-01E
22
DARWIN for Extended API - Visual Basic.NET -
Retrieval of the Measured Data
Program Example
Module Module1
Public Sub Meas()
Dim comm As Integer
Dim rc As Integer
Dim value As Integer
'connect
comm = openDA100Reader("192.168.1.11", rc)
'get
rc = measInstChDA100Reader(comm, 0, 1)
value = dataValueDA100Reader(comm, 0, 1)
'disconnect
rc = closeDA100Reader(comm)
End Sub
End Module
Description
Overview
Retrieves instantaneous values of the measured data from channel 1 of DARWIN
subunit number 0 and stores them in the field. Reads the measured values and
concludes the process.
Communication Connection
comm = openDA100Reader("192.168.1.11", rc)
The IP address of the DARWIN is specified. This statement specifies the
communication constant for the port number for loading the instantaneous value
data.
Retrieval of the Measured Data of Channel 1
rc = measInstChDA100Reader(comm, 0, 1)
Retrieves instantaneous values of the measured data from channel 1 of DARWIN
subunit number 0 and stores them in the field.
Retrieval of Measured Values
value = dataValueDA100Reader(comm, 0, 1)
Reads the measured value of channel 1 of subunit number 0 from the field where
the measured data is stored.
Comm. cut
rc = closeDA100Reader(comm)
Drops the connection.
22.4 Program for Loading Instantaneous Value Data -DARWIN/Visual Basic.NET-