كيفية القيام بما يلي: إنشاء خاصية

يجب إحاطة تعريف خاصية بين عبارة Property و العبارة End Property. ضمن هذا التعريف عرّف الإجراء Get ، الإجراء Set ، أو كلاهما. كل خصائص التعليمات البرمجية يقع ضمن هذه الإجراءات.

الإجراء Get يسترد قيمة، و إجراء Set الخاصة به يخزن القيمة. إذا كنت تريد خاصية إلى حق الوصول للقراءة/الكتابة, يجب عليك تعريف كلا الإجراءات. تقوم بتعريف لخاصية للقراءة فقطGet، وتعريف خاصية للكتابة فقط يمكنك فقط Set.

لإنشاء خاصية

1. خارج أي إجراء آخر استخدم عبارة كشف الخاصية متبوعاً بعبارة End Property .

2. إذا استغرق خاصية المعلمات, اتبع الكلمة الاساسية Property مع اسم الإجراء ثم قائمة المعلمات في أقواس.

3. اتباع الأقواس مع جملة As لتحديد نوع البيانات قيمة الخاصية. يجب تحديد نوع البيانات حتى لخاصية الكتابة فقط.

4. أضف الإجراءات Get و Set بالشكل المناسب. راجع الإرشادات التالية.

لإنشاء إجراء Get لاسترداد قيمة الخاصية

1. بين عبارات Property و End Property كتابة بيانات، الحصول على كشف، متبوعة End Get. لا تحتاج إلى تعريف أية معلمات إجراء الخاص Get.

2. وضع عبارات تعليمات برمجية استرداد القيمة خاصية بين عبارة Get و End Get. يمكن أن تتضمن هذه التعليمة البرمجية عمليات حسابية أخرى و المعالجات بيانات بالإضافة إلى إنشاء بإرجاع القيمة خاصية.

3. استخدم عبارة Return لإرجاع القيمة إلى استدعاء التعليمات البرمجية.

تقوم بتعريف لخاصية للقراءة فقطGet، وتعريف خاصية للكتابة فقط يمكنك فقط . لا يجب عليك تعريف إجراء Get الخاص بخاصية للكتابة فقط.

إنشاء إجراء تعيين القيمة خاصية يكتب

1. بين عبارات Property و End Property كتابة بيانات، كشف Vsual Basic) Set)، متبوعة End Set.

2. في جملة Set اتبع كلمة الأساسية Set مع قائمة معلمات في أقواس. هذه المعلمة قائمة يجب أن يتضمن على الأقل القيمة معلمة لالقيمة التي تم تمريرها من قبل استدعاء تعليمات برمجية. اسم الافتراضية لهذه معلمة القيمةValue، ولكن يمكنك استخدام اسم مختلف إذا كان ذلك مناسباً. معلمة القيمة يجب أن يكون لهما نفس نوع بيانات كخاصية نفسه.

3. وضع عبارات تعليمات برمجية استرداد القيمة خاصية بين عبارة Set و End Set. يمكن أن تتضمن هذه التعليمة البرمجية عمليات حسابية أخرى و المعالجات بيانات بالإضافة إلى إنشاء بإرجاع القيمة خاصية.

4. استخدم معلمة قيمة إلى قبول القيمة الذي تم توفيره من قبل استدعاء تعليمات برمجية. يمكنك إما يخزن هذه القيمة مباشرة في عبارة تعيين أو استخدامها في تعبير إلى لحساب القيمة داخلي إلى يمكن التخزين.

تقوم بتعريف لخاصية للقراءة فقطSet، وتعريف خاصية للكتابة فقط يمكنك فقط . لا يجب عليك تعريف إجراء Set الخاص بخاصية للكتابة فقط.

مثال

ينشئ المثال التالي الذي يقوم بتخزين اسم كامل اسمين constituent الاسم أول واسم العائلة في خاصية قراءة/كتابة. عندما يقرأ التعليمات البرمجية الاستدعاء fullName، Get يقوم بدمج الاسمين وإرجاع إجراء الاسم الكامل. عند استدعاء تعليمات برمجية بتعيين اسم كامل جديد,إجراء Set يحاول إلى قطع الاسمين. إذا كان لم يعثر على مسافة يتم بتخزنها مثل الاسم الأول.

Dim firstName, lastName As String
Property fullName() As String
    Get
      If lastName = "" Then
          Return firstName
      Else
          Return firstName & " " & lastName
      End If

    End Get
    Set(ByVal Value As String)
        Dim space As Integer = Value.IndexOf(" ")
        If space < 0 Then
            firstName = Value
            lastName = ""
        Else
            firstName = Value.Substring(0, space)
            lastName = Value.Substring(space + 1)
        End If
    End Set
End Property

يظهر المثال التالي المكالمات النموذجية إلى الإجراءات خاصية fullName. أول يتصل تعيين القيمة خاصية و الثاني يتصل يسترد عليه.

fullName = "MyFirstName MyLastName"
MsgBox(fullName)

راجع أيضًا:

المهام

كيفية القيام بما يلي: تقوم بتعريف خاصية مع مستويات وصول مختلطة

كيفية القيام بما يلي: الاتصال بإجراء الخصائص

كيفية القيام بما يلي: تعريف واستدعاء الخاصية الافتراضية في Visual Basic

كيفية القيام بما يلي: وضع إحدى القيم في خاصية

كيفية القيام بما يلي: الحصول على القيمة من الخاصية

المبادئ

الـإجراءات في Visual Basic

إجراءات الخاصية

معلمات إجراء و وسيطات

الفروق بين الخصائص و المتغيرات في Visual Basic