Private Sub MyOPCGroup_DataChange(ByVal TransactionID As Integer, ByVal _
  NumItems _
  As Integer, ByVal ClientHandles As System.Array, ByVal ItemValues As _
  System.Array, ByVal _
  Qualities As System.Array, ByVal TimeStamps As System.Array)
 
 MsgBox("Test")' nur zum Testen ob die Methode aufgerufen wird!
 
 
End Sub