Return (CType(BF.Deserialize(MS), CResume))
End Function
End Class
在Form里面可以这样调用
Dim Resume1 As New CResume()
Dim Resume2 As New CResume()
Resume1.Name = "AAA"
Resume1.Address = "Shanghai,China"
Resume2 = Resume1.Clone()
Resume1.Name = "BBB"
Resume1.Address = "Beijing,China"
Debug.WriteLine(Resume1.Name) ‘依然是AAA
Debug.WriteLine(Resume1.Address)
总结:主要调用了VB.NET的流和序列化技术,使得对象的克隆免去了繁琐的读写操作,也简化了代码。
上一页 [1] [2]
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18