偷偷摘套内射激情视频,久久精品99国产国产精,中文字幕无线乱码人妻,中文在线中文a,性爽19p

VB.NET對(duì)象克隆的應(yīng)用法則

開發(fā) 后端
VB.NET對(duì)象克隆的實(shí)現(xiàn)在實(shí)際編程中是一個(gè)非常重要的作用。我們可以通過本文介紹的內(nèi)容詳細(xì)對(duì)此進(jìn)行一個(gè)了解,并掌握這一應(yīng)用技巧。

VB.NET編程語言的應(yīng)用范圍非常廣泛,比如在數(shù)據(jù)庫的連接方面,對(duì)于Excle的操作,對(duì)于界面的操作等等方面。我們?cè)谶@里會(huì)為大家介紹一下有關(guān)VB.NET對(duì)象克隆的實(shí)現(xiàn)方法,并對(duì)其實(shí)現(xiàn)的功能進(jìn)行一個(gè)初步的掌握。

在3DMAX里面,做好一個(gè)物體(父物體)以后,可以選擇Edit菜單中的Clone,下面有三中選項(xiàng):Copy(生成一個(gè)同模樣的子物體,兩者的操作互不影響),Instance(父子互動(dòng),父物體的操作同樣影響子物體,子物體也一樣),還有一個(gè)Reference(暫不考慮)。

在VB.NET,同樣會(huì)碰到這樣的問題。創(chuàng)建一個(gè)復(fù)雜對(duì)象(可能有很多種不同的數(shù)據(jù)類型)的實(shí)例,進(jìn)行了一系列操作之后,想讓一個(gè)中間變量或幾個(gè)(另外的實(shí)例)保存它的狀態(tài),我們一般采取逐個(gè)變量賦值,有時(shí)候會(huì)寫很長的代碼:)這實(shí)際上就是上述的Copy問題。而對(duì)于Instance,很簡(jiǎn)單,新建一個(gè)實(shí)例,指向一下就可以了:

 

  1. Dim objA As New CResume 
  2. ‘Cresume是一個(gè)自定義的記錄簡(jiǎn)歷信息的類 

然后進(jìn)行初始化,比如:

 

  1. objA.Name=”AAA”  
  2. objA.Address=”Shanghai,
    China”  
  3. ……  
  4. Dim objB As New CResume 
    ‘新建一個(gè)實(shí)例  
  5. objB=objA 

 

這樣的話,objB跟objA有相同狀態(tài),值得注意的是objB改變一個(gè)Name,比如:

 

  1. objB.Name=”BBB” 

 

而實(shí)際上,objA的Name也變?yōu)?ldquo;BBB”,理由很簡(jiǎn)單。它們指向同一塊內(nèi)存空間。#t#

 

下面我們重點(diǎn)討論對(duì)象的Clone問題,即Copy以后的各個(gè)對(duì)象互不影響,關(guān)鍵是如何采用簡(jiǎn)單的方法解決我們的問題,MemoryStream和BinFormatter配合一下可以很簡(jiǎn)單的把VB.NET對(duì)象克隆。

MemoryStream,我以前提到過,是支持存儲(chǔ)區(qū)為內(nèi)存的流。

BinFormatter,主要以二進(jìn)制形式序列化和反序列化對(duì)象。

主要思路:

先用BinFormatter的Serialize方法,把對(duì)象存儲(chǔ)在MemoryStream流中,(操作跟其他Stream一樣),然后Deserialize反序列化,得到一個(gè)流式的數(shù)據(jù),轉(zhuǎn)化為原來對(duì)象的類型就可以了。是不是很簡(jiǎn)單?呵呵??匆幌麓a再說:

CResume類的代碼:

 

 

  1. Imports System.IO  
  2.  
  3. Imports System.Runtime.
    Serialization.Formatters  
  4.  
  5. < Serializable()> Public 
    Class CResume   
  6. ‘注意類前面加上Serializable()
    屬性,否則不可以序列化  
  7. Dim m_Name As String '姓名  
  8. Dim m_Address As String '地址  
  9. Public Property Address() As String  
  10. Get  
  11. Return m_Address  
  12. End Get  
  13. Set(ByVal NewAddress As String)  
  14. m_Address = NewAddress 
  15. End Set  
  16. End Property  
  17. Public Property Name() As String  
  18. Get  
  19. Return m_Name  
  20. End Get  
  21. Set(ByVal NewName As String)  
  22. m_Name = NewName 
  23. End Set  
  24. End Property  
  25. Public Function Clone() As CResume  
  26. Dim BF As New Binary.BinaryFormatter()  
  27. Dim MS As New MemoryStream()  
  28. BF.Serialize(MS, Me)  
  29. MS.Position = 0 
  30. Return (CType(BF.Deserialize
    (MS), CResume))  
  31. End Function  
  32. End Class 

 

 

在Form里面可以這樣調(diào)用

 

  1. Dim Resume1 As New CResume()  
  2. Dim Resume2 As New CResume()  
  3. Resume1.Name = "AAA" 
  4. Resume1.Address = "Shanghai,China" 
  5. Resume2 = Resume1.Clone()  
  6. Resume1.Name = "BBB" 
  7. Resume1.Address = "Beijing,China" 
  8. Debug.WriteLine(Resume1.Name) 
    ‘依然是AAA  
  9. Debug.WriteLine(Resume1.Address)  

 

 

總結(jié):主要調(diào)用了VB.NET的流和序列化技術(shù),使得VB.NET對(duì)象克隆免去了繁瑣的讀寫操作,也簡(jiǎn)化了代碼。

責(zé)任編輯:曹凱 來源: CSDN
相關(guān)推薦

2010-01-19 18:45:25

VB.NET窗體嵌套

2010-01-22 13:28:13

VB.NET對(duì)象克隆

2009-10-09 15:59:41

VB.NET對(duì)象

2009-10-14 13:21:46

VB.NET Acco

2010-01-12 16:20:44

VB.NET類

2009-10-30 11:20:54

VB.NET Proc

2010-01-12 18:05:38

VB.NET對(duì)象

2009-10-13 17:03:55

VB.NET面向?qū)ο?/a>

2009-11-02 16:22:16

VB.NET面向?qū)ο?/a>

2009-10-23 14:06:07

VB.NET類對(duì)象

2009-10-12 16:39:59

OracleTransVB.NET使用

2010-01-21 18:35:56

VB.NET Impo

2010-07-06 15:54:30

VB.NET UDP

2009-10-26 10:44:27

VB.NET API函

2010-01-07 15:57:02

VB.NET ForEach

2009-11-02 15:57:36

VB.NET WEB

2010-01-07 15:25:11

VB.NET數(shù)組

2009-11-10 16:46:52

VB.NET指針應(yīng)用

2009-04-30 16:21:37

VB.NET通用對(duì)象列表

2009-06-29 10:50:18

VB.NET面向?qū)ο竽芰?/a>
點(diǎn)贊
收藏

51CTO技術(shù)棧公眾號(hào)