這篇文章給大家介紹VB.NET中怎么實現(xiàn)序列化,內(nèi)容非常詳細(xì),感興趣的小伙伴們可以參考借鑒,希望對大家能有所幫助。
成都創(chuàng)新互聯(lián)公司堅持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:網(wǎng)站建設(shè)、成都做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時代的荷塘網(wǎng)站設(shè)計、移動媒體設(shè)計的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
首先是定義數(shù)組:
Dim nums(10) As Integer
然后是生成數(shù)組內(nèi)容:
Dim i As Integer
For i = 0 To 10
nums(i) = Int(Rnd()
* 500) + 100Next
VB.NET序列化是通過Formatter對象來實現(xiàn)的。我們要新建一個Formatter對象:
Dim sfFormatter As New
System.Runtime.Serialization.
Formatters.Binary.BinaryFormatter
BinaryFormatter是進行二進制序列化的。其它的序列化方式你可以在Runtime.Serialization.Formatters中找到。
我們還要有一個流來作為序列化的輸出:
Dim fStream As New
FileStream(“1.dat”,
FileMode.Create)
準(zhǔn)備工作完了,現(xiàn)在可以調(diào)用Formatter的Serialize方法來進行序列化了:
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.BinaryFormatternums = sfFormatter.Deserialize
(fStream)fStream.Close()
End Sub
VB.NET序列化就這么簡單。這里只是序列化整數(shù)數(shù)組。如果你要對自定義類的對象進行序列化,你需要在類的定義前面加上:
< Serializable()>
對于VB.NET序列化還有更高級的應(yīng)用,比方你可以指定類中的哪些成員不能被序列化,以及定義自己的序列化接口。
關(guān)于VB.NET中怎么實現(xiàn)序列化就分享到這里了,希望以上內(nèi)容可以對大家有一定的幫助,可以學(xué)到更多知識。如果覺得文章不錯,可以把它分享出去讓更多的人看到。