Procedure: testen of twee objecten hetzelfde zijn (Visual Basic)

Als u twee variabelen hebt die verwijzen naar objecten, kunt u de Is of IsNot operator of beide gebruiken om te bepalen of ze naar hetzelfde exemplaar verwijzen.

Testen of twee objecten hetzelfde zijn

• Gebruik de operator Is of de IsNot-operator met de twee variabelen als operanden.

  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
  

Mogelijk wilt u een bepaalde actie ondernemen, afhankelijk van of twee objecten naar hetzelfde exemplaar verwijzen. In het voorgaande voorbeeld wordt het besturingselement c vergeleken met het actieve besturingselement op het formulier f. Als er geen actief besturingselement is of als er een is, maar niet hetzelfde besturingselementexemplaren is als c, mislukt de If instructie en retourneert de procedure zonder verdere verwerking.

Of u nu gebruikt Is of IsNot een kwestie van persoonlijk gemak voor u is. Het ene is mogelijk gemakkelijker te lezen dan de andere in een bepaalde expressie.

Zie ook

• Vergelijkingsoperators in Visual Basic