Vb.net反序列化json中的对象

Question

我不知道要在变量上面放什么来反序列化对象，我找不到它在任何地方...... （我不想使用json.net）

这里的类代码

<Serializable()> _ 
Public Class O 
<???????()> _ 
Private Likes As Decimal 

Public Sub New(ByVal l As Decimal) 
    Likes = l 
End Sub 
End Class 

和这里的主代码

Dim ser As New DataContractJsonSerializer(GetType(O)) 
    Dim ms As New MemoryStream(Encoding.UTF8.GetBytes(resp)) 
    Dim o As O= CType(ser.ReadObject(ms), O) 
    ms.Close() 
    ms.Dispose() 

所以我应该怎么放，而不是????

Answer 1

您必须公开Likes成员。

Public Class O 

    Public Likes As Decimal 

    Public Sub New(ByVal l As Decimal) 
     Likes = l 
    End Sub 

End Class