Как связать событие с изменением значения переменной?

[viter.alex]

Имеется переменная, допустим Integer (счётчик). При изменении значения переменной мне нужно выполнять набор действий. Сейчас это делаю в лоб: после строки кода, в которой изменяю значение этой переменной, пишу этот набор действий, ну или ставлю процедуру, в которой этот набор действий записан.
Но понимаю, что это не по-человечески: я искусственно создаю лишнюю процедуру. Да и не всегда можно отследить все места, где переменная изменяется.
Как генерировать событие при изменении переменной? Класс создавать или как?

[MIT]

Сделать переменную-счетчик приватным, создать свойство для доступа к значению и установки значения, в set_Property вызывать событие:

Код: Выделить всё

Public Class MyClass
Private _counter as integer
Public Event CounterChanged(NewValue as integer)

Public Property Counter as Integer
  Get
    Return _counter
  End Get
  Set(Value as integer)
    _counter=Value
    RaiseEvent CounterChanged(Value)
  End Set
End Property
End Class

[viter.alex]

Ясненько, спасибо