شرح ال Property

بسم الله الرحمن الرحيم

سوف أقوم بشرح الـ Property وفائدتها

الـ Property تستخدم للتعامل مع متغير فهى تقوم بوضع قيمة فيه أو استرجاع قيمة منه

الـ Property عبارة عن عدد اثنين Function

الـ Function الأولى تقوم بوضع قيمة داخل المتغير وتسمى Set

والأخرى تقوم باسرجاع القمية من المتغير وتسمى Get

مثال نقوم بعمل Class باسم

BankAccount

ثم نقوم بتعريف متغير داخل الكلاس من نوع integer

  Private balanace As Int32

وهذا الميتغير من نوع Private اى لا يظهر لمستخدم Class

ثم نقوم بعمل Property باسم Balance من نوع integer

    Public Property Balance() As Int32
        Get
            Return balanace
        End Get
        Set(ByVal Value As Int32)
            
        End Set
    End Property

ما فائدة Property

يمكن عمل التحكم فى القيمة المدخلة الى المتغير عن طريق Function get

      Public Property Balance() As Int32
        Get
            Return balanace
        End Get
        Set(ByVal Value As Int32)
            If Value > 1000 Then
                balanace = Value
            End If
        End Set
    End Property

هذا مثال بسيط عن ادخال حساب العملاء فى البنك اذا كان قيمة الحساب اقل من الف لا يقوم بوضع قيمة فى المتغير ويتم التعامل مع المتغير عن طريق Property وليس اسم المتغير ولا يشترط ان ان تكون Property بنفس اسم المتغير

وطريقة التشغيل نقوم بعمل شاشة جديد فى الفجول بيسك ووضع عدد 2 button و txt

سوف نقوم بعمل instance من BankAccount

   Dim cls As New BankAccount

button get

     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.TextBox1.Text = cls.Balance
    End Sub

button set

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        cls.Balance = Me.TextBox1.Text
    End Sub

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