[Fantastico]

أهلا أخي
أكتب خاصية جديدة مع المتغير وقم باسخدام الخاصية بدل المتغير
حيث باستعمال الخاصية يمكنك فعل اي شيء تريده عندما يتم تغيير قيمتها أو طلب قيمتها

كما بالكود

PHP كود :

Dim _x As Integer = 0
    Public Property x As Integer
        Get
            x = _x
            _x += 1
        End Get
        Set(ByVal value As Integer)
            _x = value
        End Set
    End Property 


والان ستزداد القيمة كلما نطلب قيمة الخاصية مثلا نطلبها عن طريق (MsgBox(x
بالتوفيق .