VB.NET: Serialize a jSon

Serialize.vb

Class PNLinea

    Public periodo As String
    Public regimen As String
    Public causa As String
    Public identidad As String
    Public nombres As String
    Public area As String
    Public numepago As String
    Public montopagarmensual As String

End Class

Class PNResultados

    Public err As Integer = 0
    Public mensaje As String
    Public resultados() As PNLinea


End Class




ReDim Preserve Resultados.Resultados(conteo)
Resultados.Resultados(conteo) = Linea


Dim ser As New System.Web.Script.Serialization.JavaScriptSerializer()
Dim json as String = ser.Serialize(Resultados)