Changed Event Handler

Remarks

VB
Imports MBLink

' ************************
' * Controller
Dim MBDevice As New Controller

' ***********************
' * Tag
Dim WithEvents MyTag as New Tag

MBDevice.IPAddress = "192.168.1.45"

' *************************
' * set the properties
MyTag.Name = "40001"

 ' **************************
 ' * add Tag event handler
 ' *
AddHandler MyTag.Changed AddressOf MyTag_Changed

' ***************************
' * read the tag
' *
MBDevice.ReadTag(MyTag)

' ****************************
' * event handler
' * 
Private Sub MyTag_Changed(ByVal sender as object, ByVal e As System.EventArgs)     

Dim theTag as Tag
theTag = sender
Try
  If theTag.QualityCode = ResultCode.QualityGood Then
    Console.WriteLine(Convert.ToString(theTag.Value)
    Console.WriteLine(theTag.TimeStamp.ToString())
  End If
  Console.WriteLine(theTag.QualityString)
  Console.WriteLine(theTag.ErrorString)
  
Catch ex As Exception
  MessageBox.Show (ex.Message, Me.Text)                
End Sub

C#
using MBLink

// ************************
// * Instanciate Controller and
// * set the IP Address
Controller MBDevice = new Controller()
MBDevice.IPAddress = "192.168.1.45";

// *************************
// * instanciate Tag and
// * set the properties
Tag MyTag = new Tag();
theTag.Name = "40001";

// **************************
// * add ITag event handler
// *
 MyTag.Changed+= new MyTag.Changed(MyTag_Changed);

// ***************************
// * read the tag
// *
MBDevice.ReadTag(MyTag);

// ****************************
// * event handler
// * 
private void MyTag_Changed(object sender, System.EventArgs e)     
{
Tag theTag = (sender As Tag);

try
{
  if (theTag.QualityCode == ResultCode.QualityGood)
  {
    Console.WriteLine(Convert.ToString(theTag.Value);
    Console.WriteLine(theTag.TimeStamp.ToString());
  }  
  Console.WriteLine(theTag.QualityString);
  Console.WriteLine(theTag.ErrorString);
}
catch (System.Exception ex)
{
   MessageBox.Show(ex.Message, this.Text);
}                   

}

See Also

Tag Class | MBLink Namespace

---