试图保存结构文件和加载的文件从一个数组（序列化，反序列化）

Question

这里是我的数组：

Public RacersArray(AmountOfRacers - 1) As Racer 

<Serializable()> Public Structure Racer 
    Public Name As String 
    Public CleatSize As String 
    Public SkillLevel As String 
    Public Height As String 
    Public Team As String 
    Public CompatibilityArr() As String 
End Structure 

<Serializable()> Public Structure Compatibility 
    Public Name As String 
    Public Score As Integer 
End Structure 

下面是我用的，试图保存和加载从文件中的代码。该文件得到填充的是一种看上去正确的废话，而是装载阵列，它的索引时仍“无”

Public Sub RacersInputSAVE() 
    Dim bf As New System.Runtime.Serialization.Formatters.Binary.BinaryFormatter 
    Dim fStream As New FileStream(SaveLocation, FileMode.Create) 

    bf.Serialize(fStream, InputRacers.RacersArray) ' write to file 

    fStream.Close() 
End Sub 

Public Sub RacersInputLOAD() 
    Dim bf As New System.Runtime.Serialization.Formatters.Binary.BinaryFormatter 
    Dim fStream As New FileStream(LoadLocation, FileMode.Open) 

    InputRacers.RacersArray = bf.Deserialize(fStream) ' read from file 

    fStream.Close() 
End Sub 

Answer 1

这可能是错的第一件事情是这样的：

Public CompatibilityArr() As String 

名称的基础上它似乎应该是第二个Compatibility结构。如果是这样，它应该是：

Public CompatibilityArr As Compatibility() 

其如果是所描述（but when loading the array and it's indexes are still 'nothing'是模糊的，因为存在多于一个阵列）问题的一部分不清晰。否则，第二个结构不被使用。

Next，set Option Strict On。反序列化时，将BinaryFormatter总是返回Object需要被转换为正确的类型：

Racers = DirectCast(bf.Deserialize(fs), Racer()) ' read from file 

有了这些变化2，所有的数据进行的往返对我很好。

第三，Structure是不正确的类型。这些应该是类，而不是公共字段/成员，使用性能尤其是如果有是有约束力的任何涉及的数据：

<Serializable()> 
Public Class Racer 
    Public Property Name As String 
    ... 

而且，任何它实现了Dispose()方法，像FileStream应该在Using使用块，将关闭与目标对象的处理：

Dim bf As New BinaryFormatter 
Using fs As New FileStream(fileName, FileMode.Create) 
    bf.Serialize(fs, Racers) ' write to file 
End Using 

最后，你可能会发现一些NET的集合，如List(Of Racer)的比阵列更容易与工作。大约需要15分钟来了解他们的工作方式。

MSDN：Choosing Between Class and Struct

Answer 2

出于某种原因，我从未有过的好运气序列化到使用BinaryFormatter的文件。确切的原因失去了时间的迷雾，但我确实知道，SoapFormatter正常工作对我来说：

Using oStream As Stream = File.Open(SaveLocation, FileMode.Create, IO.FileAccess.Write) 
     If oStream IsNot Nothing Then 
      Call (New System.Runtime.Serialization.Formatters.Soap.SoapFormatter).Serialize(oStream, InputRacers.RacersArray) 
     End If 
    End Using