كيفية القيام بما يلي: اختبار ما إذا كان كائنان متماثلان

إذا كان لديك متغيران يشيران إلى كائنات، يمكنك استخدام إما عامل تشغيل Is أو IsNot أو كليهما لتحديد ما إذا كانت تشير إلى نفس المثيل.

لاختبار ما إذا كان كائنان متماثلان

• استخدام عامل التشغيل Is في (Visual Basic) أو عامل التشغيل IsNot مع المتغيران كمعاملات.

  Public Sub processControl(ByVal f As System.Windows.Forms.Form, 
      ByVal c As System.Windows.Forms.Control)
      Dim active As System.Windows.Forms.Control = f.ActiveControl
      If (active IsNot Nothing) And (c Is active) Then
          ' Insert code to process control c
      End If
      Return
  End Sub
  

قد تحتاج إلى اتخاذ إجراء معينة استناداً إلى ما إذا كان كائنين تشيران إلى نفس المثيل. يقارن المثال السابق عنصر تحكم c مقابل عنصر التحكم النشط على نموذج f. إذا لم يكن هناك عنصر تحكم نشط، أو إذا كان هناك لكنه ليس نفس مثيل عنصر التحكم كـ c، إذا عبارة If تفشل و يرجع الإجراء بدون معالجة إضافية.

إذا استخدمت Is أو IsNot هو أمر يتعلق بالملاءمة الشخصية لك. قد يكون أحدهما أسهل للقراءة من الآخر في تعبير معطى.

راجع أيضًا:

المبادئ

عوامل تشغيل المقارنة في Visual Basic