中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET中怎么實現序列化

發布時間:2021-07-19 16:09:09 來源:億速云 閱讀:329 作者:Leah 欄目:編程語言

這篇文章給大家介紹VB.NET中怎么實現序列化,內容非常詳細,感興趣的小伙伴們可以參考借鑒,希望對大家能有所幫助。

首先是定義數組:

  1. Dim nums(10) As Integer 

然后是生成數組內容:

  1. Dim i As Integer  

  2. For i = 0 To 10  

  3. nums(i) = Int(Rnd() 
    * 500) + 100  

  4. Next 

VB.NET序列化是通過Formatter對象來實現的。我們要新建一個Formatter對象:

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

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

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

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

準備工作完了,現在可以調用Formatter的Serialize方法來進行序列化了:

  1. sfFormatter.Serialize
    (fStream, nums) 

VB.NET序列化的***不要忘了關閉流:

fStream.Close()

反序列化的方式大同小異,只不過調用的是Formatter的Deserialize方法。代碼是這樣的:

  1. Private Sub Deserialize()  

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

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

  4. nums = sfFormatter.Deserialize
    (fStream)  

  5. fStream.Close()  

  6. End Sub 

VB.NET序列化就這么簡單。這里只是序列化整數數組。如果你要對自定義類的對象進行序列化,你需要在類的定義前面加上:

< Serializable()>

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

關于VB.NET中怎么實現序列化就分享到這里了,希望以上內容可以對大家有一定的幫助,可以學到更多知識。如果覺得文章不錯,可以把它分享出去讓更多的人看到。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

芜湖市| 巫溪县| 万荣县| 浦北县| 蓝田县| 年辖:市辖区| 铁岭县| 漾濞| 洛隆县| 寿光市| 嵊州市| 西安市| 石城县| 毕节市| 通化县| 上蔡县| 城固县| 阳城县| 杨浦区| 张家界市| 工布江达县| 正镶白旗| 闽清县| 大庆市| 上犹县| 巢湖市| 桐城市| 彩票| 景宁| 台东市| 宣武区| 嵩明县| 呼玛县| 阜平县| 奉节县| 定远县| 晴隆县| 泰宁县| 仁怀市| 湖州市| 临高县|