Imports System.ComponentModel Public Class BarcodeData Implements INotifyPropertyChanged Public Sub New() Data = String.Empty End Sub Private barcodeData As String Property Data() As String Get Return barcodeData End Get Set(ByVal value As String) barcodeData = value RaisePropertyChanged() End Set End Property Public Event PropertyChanged(ByVal sender As Object, ByVal e As PropertyChangedEventArgs) Implements INotifyPropertyChanged.PropertyChanged Private Sub RaisePropertyChanged() RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Data")) End Sub End Class