VB.NET newtonsoft列表

这个问题很简单，但我似乎找不到解决办法。 我有一个json阅读器，需要这样的json：

[
  {
    "name": "name",
    "ip": "0.0.0.0"
  },
  {
    "name": "name",
    "ip": "0.0.0.0"
  }
]

Public Class main_object
            Public e As New List(Of _subObject)
            Public Class _subObject
                Public name As String
                Public ip As String
            End Class
        End Class

我在vb上创建了一个类，如下所示：

[
  {
    "name": "name",
    "ip": "0.0.0.0"
  },
  {
    "name": "name",
    "ip": "0.0.0.0"
  }
]

Public Class main_object
            Public e As New List(Of _subObject)
            Public Class _subObject
                Public name As String
                Public ip As String
            End Class
        End Class

我的问题是，输出以

{
"e"[
mylist
]
}

有什么解决方案吗？

试试这个：

Public Class _subObject
   Public name As String
   Public ip As String
End Class

dim e As New List(Of _subObject)
dim x as new _subObject
x.name = "name"
x.ip= "0.0.0.0"
e.add(x)
e.add(x)
Dim jsonString As String = JsonConvert.SerializeObject(e, Formatting.Indented)

你会在jsonString中得到这个

[
  {
    "name": "name",
    "ip": "0.0.0.0"
  },
  {
    "name": "name",
    "ip": "0.0.0.0"
  }
]

试试这个：

Public Class _subObject
   Public name As String
   Public ip As String
End Class

dim e As New List(Of _subObject)
dim x as new _subObject
x.name = "name"
x.ip= "0.0.0.0"
e.add(x)
e.add(x)
Dim jsonString As String = JsonConvert.SerializeObject(e, Formatting.Indented)

你会在jsonString中得到这个

[
  {
    "name": "name",
    "ip": "0.0.0.0"
  },
  {
    "name": "name",
    "ip": "0.0.0.0"
  }
]

---

工作起来很有魅力。太谢谢你了，很有魅力。非常感谢你。