VB.NETでXMLSerializerを使用して汎用コレクションをシリアライズ

Question

なぜXMLSerializerは汎用リストを処理しないのですか？

Sub Main() 
    Serializing() 
End Sub 

<System.Serializable()> _ 
Public Class User 
    Public Sub New() 
    End Sub 

    Public Sub New(ByVal Username As String, ByVal UserId As Integer) 
     Name = Username 
     ID = UserId 
    End Sub 

    Public Name As String 
    Public ID As Integer 
End Class 

Public Sub Serializing() 
    Dim Users As New List(Of User) 

    Dim u As New User 
    u.Name = "bob" 
    u.ID = 1 
    Users.Add(u) 

    u.Name = "bill" 
    u.ID = 2 
    Users.Add(u) 

    u.Name = "ted" 
    u.ID = 3 
    Users.Add(u) 

    Dim sw As New System.IO.StringWriter 
    Dim ser As New System.Xml.Serialization.XmlSerializer(GetType(List(Of User))) 
    ser.Serialize(sw, Users) 

    Debug.WriteLine(sw.ToString) 

End Sub 

私が言って、「薄暗いSER」のライン上の例外を取得「Testing.Module1は、その保護レベルにアクセスできません。唯一のパブリック型を処理することができます。」 （ "Testing"はアプリケーションの名前で、 "Module1"はモジュールの名前です;これはコンソールアプリケーションです）

Answer 1

問題はモジュールModule1の内部にクラスUserを含めたことです。このモジュールのアクセシビリティは公開されていないことを示しています。したがって、ユーザーの実際のアクセシビリティは、モジュール内にネストされているためパブリックではありません。

外部モジュールの定義をPublicに変更するか、あなたの問題を解決するはずです。

EDIT

いくつかの人々が指摘したように、これを達成する最もクリーンな方法は、Userクラスをそれ自身のファイルに入れることです。