发送JSON数据时出现问题

Question

我必须以特定格式传递我的Json数据。 我的应用程序以vb。

编码

以下是我的代码：

 Dim jsonObject As New Json.JsonObject
    jsonObject.Item("count") = New Json.JsonNumber("0")
     jsonObject.Item("data") = New Json.JsonArray("")
    **jsonObject.Item("success") = New Json.JsonString("True")**

    The Problem lies in the line :

jsonObject.Item（“success”）= New Json.JsonString（“True”）。         显示的错误消息是“Type'Jayrock.Json.JsonString'没有构造函数。”

添加我已经导入了相关的库。

我该怎么做才能解决这个问题？

Answer 1

尝试这样：

Dim jsonObject As New Json.JsonObject  
jsonObject.Item("count") = 0  
jsonObject.Item("data") = New Json.JsonArray()  
jsonObject.Item("success") = "True"

换句话说，您可以使用字符串和整数等基本类型作为值。