[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته

جرب طريقة Property

كود :

Private _myValue As Integer
    Property myValue() As Integer
        Get
            Return _myValue
        End Get
        Set(ByVal value As Integer)
            _myValue = value
            myValueChanged()
        End Set
    End Property
    Private Sub myValueChanged()
        MsgBox("myValue Change ")
    End Sub

السلام عليكم ورحمة الله وبركاته