RosettaCodeData/Task/Pointers-and-references/VBA/pointers-and-references.vba

4 lines
101 B
Plaintext

Dim samplevariable as New Object
Dim anothervariable as Object
Set anothervariable = sameplevariable