如何在VB.NET中序列化(对象的)列表？

<Serializable()>
Public Class MyClass
    Public Property Name As String
    Public Property Age As Integer
End Class

Dim myList As New List(Of MyClass)()
myList.Add(New MyClass() With {.Name = "John", .Age = 25})
myList.Add(New MyClass() With {.Name = "Jane", .Age = 30})

Dim formatter As New System.Runtime.Serialization.Formatters.Binary.BinaryFormatter()
Using stream As New FileStream("data.bin", FileMode.Create, FileAccess.Write)
    formatter.Serialize(stream, myList)
End Using

Dim formatter As New System.Runtime.Serialization.Formatters.Binary.BinaryFormatter()
Using stream As New FileStream("data.bin", FileMode.Open, FileAccess.Read)
    Dim deserializedList As List(Of MyClass) = DirectCast(formatter.Deserialize(stream), List(Of MyClass))
End Using