ToJsonString ,,虽然是COPY的 可很有用

Framework 3.5

Imports System.Runtime.CompilerServices
Imports System.Web.Script.Serialization

Public Module JSONHelper
    <Extension()> _
    Public Function ToJSONString(ByVal obj As Object) As String
        Dim Serializer As New JavaScriptSerializer
        Return Serializer.Serialize(obj)
    End Function
End Module