VB.NET中怎么實(shí)現(xiàn)序列化

這篇文章給大家介紹VB.NET中怎么實(shí)現(xiàn)序列化，內(nèi)容非常詳細(xì)，感興趣的小伙伴們可以參考借鑒，希望對大家能有所幫助。

首先是定義數(shù)組：

1. Dim nums(10) As Integer 

然后是生成數(shù)組內(nèi)容：

Dim i As Integer  
For i = 0 To 10  
nums(i) = Int(Rnd() 
* 500) + 100  
Next 

VB.NET序列化是通過Formatter對象來實(shí)現(xiàn)的。我們要新建一個Formatter對象：

Dim sfFormatter As New 
System.Runtime.Serialization.
Formatters.Binary.BinaryFormatter 

BinaryFormatter是進(jìn)行二進(jìn)制序列化的。其它的序列化方式你可以在Runtime.Serialization.Formatters中找到。

我們還要有一個流來作為序列化的輸出：

Dim fStream As New 
FileStream(“1.dat”, 
FileMode.Create) 

準(zhǔn)備工作完了，現(xiàn)在可以調(diào)用Formatter的Serialize方法來進(jìn)行序列化了：

sfFormatter.Serialize
(fStream, nums) 

VB.NET序列化的***不要忘了關(guān)閉流：

fStream.Close()

反序列化的方式大同小異，只不過調(diào)用的是Formatter的Deserialize方法。代碼是這樣的：

Private Sub Deserialize()  
Dim fStream As New FileStream
(“1.dat”, FileMode.Open)  
Dim sfFormatter As New System.
Runtime.Serialization.Formatters.
Binary.BinaryFormatter  
nums = sfFormatter.Deserialize
(fStream)  
fStream.Close()  
End Sub 

VB.NET序列化就這么簡單。這里只是序列化整數(shù)數(shù)組。如果你要對自定義類的對象進(jìn)行序列化，你需要在類的定義前面加上：

< Serializable()>

對于VB.NET序列化還有更高級的應(yīng)用，比方你可以指定類中的哪些成員不能被序列化，以及定義自己的序列化接口。

關(guān)于VB.NET中怎么實(shí)現(xiàn)序列化就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，可以學(xué)到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。