[VB.NET]引用和值类型的区别? 分不清了,麻烦大家看看我的代码.

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
引用和值类型的区别? 分不清了,麻烦大家看看我的代码.
Public Class RandomTemp
Public Shared RandomEventArray As ArrayList = New ArrayList
End Class
''这是静态类,作全局变量用
Dim myRandomEvent as RandomEvent=New RandomEvent ''(自己定义的类)
....(给该类的字段和属性赋值)

''然后将赋完值后的对象保存
RandomTemp.RandomEventArray.Add(myRandomEvent)

myRandomEvent.RandomIncident() ''(触发对象中的方法,该方法可以改变该对 象字段的值.)

''保存变化后的值
RandomTemp.RandomEventArray.Add(myRandomEvent)


但是运行后发先RandomTemp.RandomEventArray(0)的值也改变了.试好几种方法,就是在全局变量中保存不了myRandomEvent的值.
那位大哥看看有没有办法在全局变量中保存myRandomEvent的值.
__________________________________________________________________________
取名取的乱七八糟 关键代码又不帖
__________________________________________________________________________
贴了就太多了,没必要啊,就是一个给对象赋值的过程.
__________________________________________________________________________
RandomTemp.RandomEventArray.Add(myRandomEvent)
其中的myRandomEvent是類，即為引用類型

要保存值，這裡你需要使用值類型
比如 RandomTemp.RandomEventArray.Add(myRandomEvent.Value)
其中的Value是值類型的，如int
__________________________________________________________________________
我关键想保存整个对象.
一个个保存该对象的属性和方法,太麻烦了.
想保存对象的副本,不保存它的引用.
__________________________________________________________________________
自己實現copy,或Iclone，比如
class RandomEvent
{
public RandomEvent Copy()
{
RandomEvent ret = new RandomEvent();
ret.XXX = this.XXX;
...
return ret;
}
}

RandomTemp.RandomEventArray.Add(myRandomEvent.Copy());
__________________________________________________________________________
1 RandomTemp.RandomEventArray.Add(myRandomEvent.Copy())
2 myRandomEvent.RandomIncident() ''对象的属性和值都要发生变化
3 RandomTemp.RandomEventArray.Add(myRandomEvent.Copy)

单步调试到第2步, myRandomEvent的对象副本保存到RandomTemp.RandomEventArray(0)中,跳过第2步,到了第三步后,也就是myRandomEvent的RandomIncident()触发,之后回过头看RandomTemp.RandomEventArray(0)又改变了,等于还是没保存住myRandomEvent的对象...

是不是跟shared 全局静态变量有关啊? 还是没搞定....
__________________________________________________________________________
奇怪了,保存对象的副本也不行,还是保存不了该对象.对象一修改,保存的也跟着修改.
是不是跟全局变量有关啊?
__________________________________________________________________________
这是因为ArrayList指向的是同一对象，当然改变1个，就全改变了，解决的办法是给RandomEvent实现ICloneable接口
Class RandomEvent:ICloneable
{
public Object Clone()
{
return MemberwiseClone();
}
}

然后创建1个新对象
RandomEvent newRandomEvent = (RandomEvent)myRandomEvent.Clone();
__________________________________________________________________________
是不是静态的类,所有实例对象都是一样的?
我是整了一个静态数组,然后把某个类的实例放进去,该类的所有实例也是一样的？
__________________________________________________________________________
不是这个原因，是因为引用变量如果不New新的，他就是保持1个副本，而赋值仅仅是把保存的托管堆地址赋给他，实际对象是没有变化的 比如
Dim myRandomEvent as RandomEvent=New RandomEvent
Dim myRandomEvent2 as RandomEvent=myRandomEvent

实际上myRandomEvent和myRandomEvent2在内存中指向的是同1个地址，其中1个变化，必然导致另1个也发生变化，你去看看值类型和引用类型的区别就明白了。
__________________________________________________________________________
谢谢 isgod() 的回答.

现在的情况是,我就是New了还是不行.我把类的构造函数也给改了.
然后:

1 RandomTemp.RandomEventArray.Add(new RandomEvent(myRandomEvent))
2 myRandomEvent.RandomIncident()
3 RandomTemp.RandomEventArray.Add(new RandomEvent(myRandomEvent))

这样调试过还是不行.
__________________________________________________________________________
“流浪他乡 "的代码应该是OK的，只不过他也不知道ret.XXX = this.XXX中有那些数据类型？如果有自己定义的数据类型，又没有COPY功能，则无法全部复制。

RandomTemp.RandomEventArray.Add是一个静态调用，没有唯一的实例，你无法确定加入到什么地方。

dim x as new RandomTemp

x.RandomEventArray.Add(...)

则解决你的东东。
__________________________________________________________________________
静态类是不是所有实例共享一个东西啊!!!
牵一发动全身?!
__________________________________________________________________________
回复:sz_lgp(longguoping)
你说得对:
RandomTemp.RandomEventArray.Add是一个静态调用，没有唯一的实例，你无法确定加入到什么地方。

静态类所有实例是一样的.

但是想把这个对象保存为全局变量,就必须要用到静态类.方便调用.
如果是这样的话:
dim x as new RandomTemp
x.RandomEventArray.Add(...)

肯定能解决,但在整个应用程序中,如果不设成全局变量的话,就不能方便调用了.
__________________________________________________________________________
现在的问题,能不能把它设成全局变量? 方便整个应用程序集的调用.
__________________________________________________________________________