Advertisement
Guest User

Untitled

a guest
Jun 20th, 2019
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.87 KB | None | 0 0
  1. Public Class StaticScaleDetails
  2. Implements System.ComponentModel.INotifyPropertyChanged
  3. Public Event CreatedNewScale()
  4.  
  5. Private _ipAddress As String
  6.  
  7. Public Property ipAddress
  8. Get
  9. Return _ipAddress
  10. End Get
  11. Set(value)
  12. _ipAddress = value
  13. RaiseEvent PropertyChanged(Me, New ComponentModel.PropertyChangedEventArgs("ipAddress"))
  14. End Set
  15. End Property
  16.  
  17. Public Event PropertyChanged(sender As Object, e As System.ComponentModel.PropertyChangedEventArgs) _
  18. Implements System.ComponentModel.INotifyPropertyChanged.PropertyChanged
  19.  
  20. Public Sub New(ByVal ip As String)
  21. ipAddress = ip
  22.  
  23. RaiseEvent CreatedNewScale()
  24. End Sub
  25.  
  26. Public Sub AssociateHandlers(ByRef ipObject As Object)
  27. ipObject.DataBindings.Add(New Binding("Text", Me, "ipAddress"))
  28. End Sub
  29. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement