LibreOffice 24.8 Hjælp
Tester, om to Basic-variable refererer til den samme objektforekomst.
result = oObj1 Is oObj2
Hvis oObj1 og oObj2 er referencer til den samme ofbjektforekomst, er resultatet True (sand).
Eksemplet herunder definerer først en ny type Student (Student). Kald af TestObjects (test_objekter) opretter objektet oStudent1 som et nyt objekt af denne type.
Tildelingen oStudent2 = oStudent1 kopierer faktisk referencen til det samme objekt. Derfor er resultatet af anvendelsen af operatoren Is (er) True (sand).
Type Student
FirstName as String
Program as String
End Type
Sub TestObjects
Dim oStudent1 as new Student
Dim oStudent2 as Variant
oStudent2 = oStudent1
MsgBox Student1 Is Student2 ' True
End Sub
Eksemplet herunder returnerer False (falsk), fordi oStudent1 og oStudent2 er referencer til to forskellige objektforekomster, der hver for sig er oprettet med operatoren New (ny).
Sub TestObjects_v2
Dim oStudent1 as new Student
Dim oStudent2 as new Student
MsgBox oStudent1 Is oStudent2 ' False
End Sub