Guest User

Untitled

a guest
May 17th, 2018
151
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 1.34 KB | None | 0 0
  1.   Public Sub EndEdit() Implements System.ComponentModel.IEditableObject.EndEdit
  2.         If mbFinalStatus = True Then
  3.             mbFinalStatus = False
  4.             msOrgnaam = ""
  5.             msOrgadreslijn1 = ""
  6.             msOrgadreslijn2 = ""
  7.             msOrgpostcode = ""
  8.             msOrgplaats = ""
  9.             msOrgland = ""
  10.             msOrgtelefoon = ""
  11.             msOrgmobiel = ""
  12.             msOrgemail = ""
  13.             msOrgbtwnummer = ""
  14.  
  15.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgnaam"))
  16.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgadreslijn1"))
  17.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("OrgAdreslijn2"))
  18.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgpostcode"))
  19.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgplaats"))
  20.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgland"))
  21.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgtelefoon"))
  22.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgmobiel"))
  23.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgemail"))
  24.             RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("Orgbtwnummer"))
  25.         End If
  26.     End Sub
Add Comment
Please, Sign In to add comment