vb.net创建对对象的引用

Question

我需要创建对对象的引用，其中Prog2是对Prog1的引用这里是我需要的：

dim Prog1 as myclassprogressbar
dim Prog2 as myclassprogressbar

Prog1.initialize()
Prog1.max=10
Prog1.min=1
Prog1.value=5

Prog2.initialize()
Prog2.max=10000
Prog2.min=100
Prog2.value=500


Prog2=Prog1

Prog1.value=7


debug.print Prog2.value

7

是否可以像这样的代码创建对对象的引用？

Answer 1

您需要使用New实例化该类。然后假设myclassprogressbar是一个类，由于类是引用类型，因此在分配Prog2 = Prog1之后，变量Prog2将指向Prog1指向的同一对象。

因此，如果您为Prog1.Value分配内容，则由于Prog2指向同一对象，因此Prog2.Value将与Prog1.Value相同。

定义Prog1和Prog2之后，每个变量都指向内存中的不同对象：

Variable         | Memory
---------------------------------------------------
Prog1        --> | [Min:1     Max:10     Value:5  ]
Prog2        --> | [Min:100   Max:1000   Value:500]

设置Prog2 = Prog1后，它们都指向内存中的同一对象，并且分配给Prog2的对象唯一发生的事情是该对象仍在内存，您只是丢失了对该对象的引用：

Variable         | Memory
---------------------------------------------------
Prog1, Prog2 --> | [Min:1     Max:10     Value:5  ]
                 | [Min:100   Max:1000   Value:500]

因此，如果您设置Prog1.Value = 7或Prog2.Value = 7，则结果是相同的：

Variable         | Memory
---------------------------------------------------
Prog1, Prog2 --> | [Min:1     Max:10     Value:7  ]
                 | [Min:100   Max:1000   Value:500]

您可以了解有关Value Types and Reference Types的更多信息。