كيفية القيام بما يلي: إنشاء متغير لا يمكن تغيير قيمته
مفهوم متغير لا يغير قيمته قد تبدو متعارضة. ولكن هناك بعض الحالات عندما يكون هناك متغير غير قابل للتنفيذ و يكون من الأفضل استخدام متغير بقيمة ثابتة. في مثل هذه الحالة يمكنك تعريف متغير عضو مع الكلمة الأساسية للقراءة فقط (Visual Basic) .
لا يمكنك استخدام ال عبارة const في (Visual Basic) لتعريف وتعيين قيمة ثابتة في الحالات التالية:
كشف الConst لا يقبل نوع البيانات التي تريد استخدامها
لا تعلم القيمة في وقت التحويل البرمجي
ليس لديك القدره لحساب القيمة الثابتة وقت التحويل البرمجي
لإنشاء متغير لا يمكن تغيير قيمته
في المستوى الوحدة النمطية ، قم بتعريف متغير عضو مع عبارة Vsual Basic) Dim)، وتتضمن الكلمة الأساسية للقراءة فقط (Visual Basic) .
Dim ReadOnly timeStarted
يمكنك تحديد ReadOnly فقط على متغير عضو. وهذا يعني أنه يجب عليك تعريف المتغير على مستوى الوحدة النمطية خارج أي إجراء.
إذا أمكنك حساب القيمة في كشف واحد وقت التحويل البرمجي, استخدام جملة التهيئة في كشف Dim. اتبع ال كـجملة بعلامة التساوي (=) ، متبوعاً بتعبير. تأكد من أن المحول البرمجي يمكنه تقييم هذا التعبير لقيمة ثابتة.
Dim ReadOnly timeStarted As Date = Now
يمكنك تعيين القيمة لمتغير ReadOnly مرة واحدة فقط. بمجرد القيام بذلك، لا يمكن لأية تعليمات برمجية تغيير قيمته أبدا.
اذا لم تعرف القيمة وقت التحويل البرمجي أو لا يمكنك حسابها وقت التحويل البرمجي في كشف واحد , يمكنك مع ذلك تعيينها وقت التشغيل في دالة انشائية. للقيام بذلك، يجب أن تقوم بتعريف متغير ReadOnly في فئة أو مستوى بناء. في الدالة الانشائية لهذه الفئة أو البنية, قم بحساب القيمة الثابتة للمتغير و قم بتعيينها إلى متغير قبل الخروج من الدالة الانشائية.