using System;
using System.IO;

class Account {
  public int ID;
  public string Name;

  public override string ToString()
  {
    return string.Format("{0}:{1}", ID, Name);
  }

  // シリアライズを行うメソッド
  public void Serialize(Stream stream)
  {
    BinaryWriter writer = new BinaryWriter(stream);

    writer.Write(ID);
    writer.Write(Name);
  }

  // デシリアライズを行うメソッド
  public void Deserialize(Stream stream)
  {
    BinaryReader reader = new BinaryReader(stream);

    ID = reader.ReadInt32();
    Name = reader.ReadString();
  }
}

class Sample {
  static void Main()
  {
    // シリアライズするオブジェクトを作成
    Account alice = new Account();

    alice.ID = 2;
    alice.Name = "Alice";

    Console.WriteLine(alice);

    // オブジェクトをファイルalice.binとしてシリアライズする
    using (Stream stream = File.OpenWrite("alice.bin")) {
      alice.Serialize(stream);
    }

    // ファイルの内容を元にデシリアライズする
    Account deserialized = new Account();

    using (Stream stream = File.OpenRead("alice.bin")) {
      deserialized.Deserialize(stream);
    }

    Console.WriteLine(deserialized);
  }
}

Imports System
Imports System.IO

Class Account
  Public ID As Integer
  Public Name As String

  Public Overrides Function ToString() As String
    Return String.Format("{0}:{1}", ID, Name)
  End Function

  ' シリアライズを行うメソッド
  Public Sub Serialize(ByVal stream As Stream)
    Dim writer As New BinaryWriter(stream)

    writer.Write(ID)
    writer.Write(Name)
  End Sub

  ' デシリアライズを行うメソッド
  Public Sub Deserialize(ByVal stream As Stream)
    Dim reader As New BinaryReader(stream)

    ID = reader.ReadInt32()
    Name = reader.ReadString()
  End Sub
End Class

Class Sample
  Shared Sub Main()
    ' シリアライズするオブジェクトを作成
    Dim alice As New Account()

    alice.ID = 2
    alice.Name = "Alice"

    Console.WriteLine(alice)

    ' オブジェクトをファイルalice.binとしてシリアライズする
    Using stream As Stream = File.OpenWrite("alice.bin")
      alice.Serialize(stream)
    End Using

    ' ファイルの内容を元にデシリアライズする
    Dim deserialized As New Account()

    Using stream As Stream = File.OpenRead("alice.bin")
      deserialized.Deserialize(stream)
    End Using

    Console.WriteLine(deserialized)
  End Sub
End Class

using System;
using System.IO;
using System.Runtime.Serialization;
using System.Runtime.Serialization.Formatters.Binary;

[Serializable]
class Account {
  public int ID;
  public string Name;

  public override string ToString()
  {
    return string.Format("{0}:{1}", ID, Name);
  }
}

class Sample {
  static void Main()
  {
    // シリアライズするオブジェクトを作成
    Account alice = new Account();

    alice.ID = 2;
    alice.Name = "Alice";

    Console.WriteLine(alice);

    // オブジェクトをファイルalice.binとしてシリアライズ
    using (Stream stream = File.OpenWrite("alice.bin")) {
      BinaryFormatter formatter = new BinaryFormatter();

      formatter.Serialize(stream, alice);
    }

    // ファイルの内容を元にデシリアライズする
    Account deserialized = null;

    using (Stream stream = File.OpenRead("alice.bin")) {
      BinaryFormatter formatter = new BinaryFormatter();

      deserialized = (Account)formatter.Deserialize(stream);
    }

    Console.WriteLine(deserialized);
  }
}

Imports System
Imports System.IO
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters.Binary

<Serializable> _
Class Account
  Public ID As Integer
  Public Name As String

  Public Overrides Function ToString() As String
    Return String.Format("{0}:{1}", ID, Name)
  End Function
End Class

Class Sample
  Shared Sub Main()
    ' シリアライズするオブジェクトを作成
    Dim alice As New Account()

    alice.ID = 2
    alice.Name = "Alice"

    Console.WriteLine(alice)

    ' オブジェクトをファイルalice.binとしてシリアライズ
    Using stream As Stream = File.OpenWrite("alice.bin")
      Dim formatter As New BinaryFormatter()

      formatter.Serialize(stream, alice)
    End Using

    ' ファイルの内容を元にデシリアライズする
    Dim deserialized As Account = Nothing

    Using stream As Stream = File.OpenRead("alice.bin")
      Dim formatter As New BinaryFormatter()

      deserialized = CType(formatter.Deserialize(stream), Account)
    End Using

    Console.WriteLine(deserialized)
  End Sub
End Class

using System;
using System.Collections.Generic;
using System.IO;
using System.Xml;
using System.Xml.Serialization;

public class Account {
  public int ID;
  public string Name;

  // デフォルトコンストラクタ
  public Account() {}

  public Account(int id, string name)
  {
    this.ID = id;
    this.Name = name;
  }

  public override string ToString()
  {
    return string.Format("{0}:{1}", ID, Name);
  }
}

class Sample {
  static void Main()
  {
    Account[] arr = new Account[] {
      new Account(0, "Charlie"),
      new Account(1, "Eve"),
      new Account(2, "Alice"),
    };
    List<Account> list = new List<Account>(arr);

    // Account[]をシリアライズ
    using (Stream stream = File.OpenWrite("arr.xml")) {
      XmlSerializer serializer = new XmlSerializer(arr.GetType());

      serializer.Serialize(stream, arr);
    }

    // List<Account>をシリアライズ
    using (Stream stream = File.OpenWrite("list.xml")) {
      XmlSerializer serializer = new XmlSerializer(list.GetType());

      serializer.Serialize(stream, list);
    }

    // Account[]をデシリアライズ
    using (Stream stream = File.OpenRead("arr.xml")) {
      XmlSerializer serializer = new XmlSerializer(typeof(Account[]));

      Account[] deserialized = (Account[])serializer.Deserialize(stream);

      Console.WriteLine("Account[]");

      foreach (Account e in deserialized) {
        Console.WriteLine(e);
      }
    }

    // List<Account>をデシリアライズ
    using (Stream stream = File.OpenRead("list.xml")) {
      XmlSerializer serializer = new XmlSerializer(typeof(List<Account>));

      List<Account> deserialized = (List<Account>)serializer.Deserialize(stream);

      Console.WriteLine("List<Account>");

      foreach (Account e in deserialized) {
        Console.WriteLine(e);
      }
    }
  }
}

Imports System
Imports System.Collections.Generic
Imports System.IO
Imports System.Xml
Imports System.Xml.Serialization

Public Class Account
  Public ID As Integer
  Public Name As String

  ' デフォルトコンストラクタ
  Public Sub New()
  End Sub

  Public Sub New(ByVal id As Integer, ByVal name As String)
    MyClass.ID = id
    MyClass.Name = name
  End Sub

  Public Overrides Function ToString() As String
    Return String.Format("{0}:{1}", ID, Name)
  End Function
End Class

Class Sample
  Shared Sub Main()
    Dim arr() As Account = New Account() { _
      New Account(0, "Charlie"), _
      New Account(1, "Eve"), _
      New Account(2, "Alice") _
    }
    Dim list As New List(Of Account)(arr)

    ' Account()をシリアライズ
    Using stream As Stream = File.OpenWrite("arr.xml")
      Dim serializer As New XmlSerializer(arr.GetType())

      serializer.Serialize(stream, arr)
    End Using

    ' List(Of Account)をシリアライズ
    Using stream As Stream = File.OpenWrite("list.xml")
      Dim serializer As New XmlSerializer(list.GetType())

      serializer.Serialize(stream, list)
    End Using

    ' Account()をデシリアライズ
    Using stream As Stream = File.OpenRead("arr.xml")
      Dim serializer As New XmlSerializer(GetType(Account()))

      Dim deserialized() As Account = CType(serializer.Deserialize(stream), Account())

      Console.WriteLine("Account()")

      For Each e As Account In deserialized
        Console.WriteLine(e)
      Next
    End Using

    ' List(Of Account)をデシリアライズ
    Using stream As Stream = File.OpenRead("list.xml")
      Dim serializer As New XmlSerializer(GetType(List(Of Account)))

      Dim deserialized As List(Of Account) = CType(serializer.Deserialize(stream), List(Of Account))

      Console.WriteLine("List(Of Account)")

      For Each e As Account In deserialized
        Console.WriteLine(e)
      Next
    End Using
  End Sub
End Class

using System;
using System.IO;
using System.Runtime.Serialization;
using System.Runtime.Serialization.Formatters.Soap;

[Serializable]
abstract class AccountBase {
  protected int ID;

  protected AccountBase(int id)
  {
    this.ID = id;
  }
}

[Serializable]
class Account : AccountBase {
  public string Name;

  public Account(int id, string name)
    : base(id)
  {
    this.Name = name;
  }

  public override string ToString()
  {
    return string.Format("{0}:{1}", ID, Name);
  }
}

class Sample {
  static void Main()
  {
    Account alice = new Account(2, "Alice");

    Console.WriteLine(alice);

    // シリアライズ
    using (Stream stream = File.OpenWrite("alice.soap.xml")) {
      SoapFormatter formatter = new SoapFormatter();

      formatter.Serialize(stream, alice);
    }

    // デシリアライズ
    using (Stream stream = File.OpenRead("alice.soap.xml")) {
      SoapFormatter formatter = new SoapFormatter();

      Account deserialized = (Account)formatter.Deserialize(stream);

      Console.WriteLine(deserialized);
    }
  }
}

Imports System
Imports System.IO
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters.Soap

<Serializable> _
MustInherit Class AccountBase
  Protected ID As Integer

  Protected Sub New(ByVal id As Integer)
    MyClass.ID = id
  End Sub
End Class

<Serializable> _
Class Account
  Inherits AccountBase

  Public Name As String

  Public Sub New(ByVal id As Integer, ByVal name As String)
    MyBase.New(id)

    MyClass.Name = name
  End Sub

  Public Overrides Function ToString() As String
    Return String.Format("{0}:{1}", ID, Name)
  End Function
End Class

Class Sample
  Shared Sub Main()
    Dim alice As New Account(2, "Alice")

    Console.WriteLine(alice)

    ' シリアライズ
    Using stream As Stream = File.OpenWrite("alice.soap.xml")
      Dim formatter As New SoapFormatter()

      formatter.Serialize(stream, alice)
    End Using

    ' Account()をデシリアライズ
    Using stream As Stream = File.OpenRead("alice.soap.xml")
      Dim formatter As New SoapFormatter()

      Dim deserialized As Account = CType(formatter.Deserialize(stream), Account)

      Console.WriteLine(deserialized)
    End Using
  End Sub
End Class