### Objektum-hivatkozások vizsgálata és felszabadítása

(A kifejezések értékét szkriptek írják ki.)

Ez egy "Bekezdes" azonosítójú bekezdésobjektum.

#### Értékadás

          Dim Hivatkozas_1, Hivatkozas_2, Szam
          Szam = 10
          Set Hivatkozas_1 = Bekezdes
          Set Hivatkozas_2 = Hivatkozas_1

#### Az IsObject függvény eredménye

          IsObject(Szam)         =
          IsObject(Hivatkozas_1) =
          IsObject(Hivatkozas_2) =
          IsObject(Bekezdes)     =

#### Az Is operátor használata

          (Hivatkozas_1 Is Hivatkozas_2) =
          (Hivatkozas_1 Is Bekezdes)     =
          (Hivatkozas_2 Is Bekezdes)     =
          (Hivatkozas_1 Is Szam)         = hibaüzenet!!!

#### Az objektum-hivatkozás törlése

          Set Hivatkozas_1 = Nothing

          IsObject(Hivatkozas_1)     =  (!)
          (Hivatkozas_1 Is Bekezdes) =
          (Hivatkozas_1 Is Nothing)  =
          (Bekezdes Is Nothing)      =
          (Hivatkozas_2 Is Bekezdes) =