تعيين الكائن المتغير
يجب استخدام عبارة تعريف عادية للتصريح عن كائن متغير. يمكنك تعيين تعبير كائن أو لا شيء أساسية، كما في المثال التالي يوضح.
Dim thisObject As Object
' The following statement assigns an object reference.
thisObject = Form1
' The following statement discontinues association with any object.
thisObject = Nothing
Nothing يعني لا يوجد كائن حالياً معيّن للمتغير.
التهيئة.
يبدأ في تعليمات برمجية قيد التشغيل، الخاص بك كائن متغيرات تتم تهيئة Nothing. تلك التي تتضمن التعريفات الخاصة به تهيئة reinitialized إلى القيم التي تقوم بتحديدها عند تنفيذ عبارات تعريف.
يمكنك تضمين التهيئة في التعريف الخاص بك باستخدام كلمة أساسية جديد. تقوم بتعريف عبارات تعريف التالية كائن متغيرات testUri و ver وتعيين كائن محددة لهم. كل يستخدم أحد المُنشئات overloaded من الفئة المناسبة لتهيئة كائن.
Dim testUri As New System.Uri("https://www.microsoft.com")
Dim ver As New System.Version(6, 1, 0)
disassociation
إعداد متغير الكائن إلى Nothing اقتران المتغير غير متصل مع أي كائن محدد. وهذا يمنعك من تغيير بطريق الخطأ كائن بتغيير المتغير. كما يسمح لك اختبار ما إذا كان متغير الكائن الذي يشير إلى كائن صالح كما هو موضح في المثال التالي.
If otherObject IsNot Nothing Then
' otherObject refers to a valid object, so your code can use it.
End If
إذا كان كائن لديك متغير يشير إلى يتم يتعذر في تطبيق آخر تحديد هذا الاختبار ما إذا كان لدى ذلك التطبيق إنهاء أو فقط التي يتم إبطالها كائن.
كائن متغير يحتوي على القيمة Nothing يدعى أيضاً مرجع فارغ.
معرف المثيل الأصل
الحالي مثيل الكائن هو فيه تنفيذ تعليمات برمجية حالياً. بما أن ينفذ الكل تعليمات برمجية داخل إجراء الحالي مثيل هو الذي تم استدعاء الإجراء.
كلمة أساسية Me يتصرف متغير كائن الإشارة إلى الحالي مثيل. إذا لم يكن إجراء (Visual Basic) المشترك، يمكن استخدامه كلمة أساسية Me للحصول على مؤشر الحالي مثيل. لا يمكن أن تكون الإجراءات المشتركة مقترنة معين مثيل لفئة ما.
باستخدامMe مفيد بشكل خاص تمرير الحالي مثيل إلى إجراء في وحدة نمطية آخر. على سبيل المثال، افترض أن لديك عدد من مستندات XML وكنت ترغب في إضافتها بعض نص القياسي إلى جميعاً. يحدد المثال التالي إجراء إلى القيام بذلك.
Sub addStandardText(XmlDoc As System.Xml.XmlDocument)
XmlDoc.CreateTextNode("This text goes into every XML document.")
End Sub
كل كائن مستند XML ثم استدعاء إجراء كما تمرير المثيل الحالي الخاص به كوسيطة. يوضح المثال التالي هذا.
addStandardText(Me)
راجع أيضًا:
المهام
كيفية القيام بما يلي: قم بتصريح كائن متغير ثم تعيين أحد الكائنات للصور في Visual Basic
كيفية القيام بما يلي: إجعل متغير كائن لا يشار إلى أي مثيل