如何读取JSON文件

我将使用以下代码从请求中获取json

        Dim url As String = urlbuilder.ToString
        Dim request As HttpWebRequest = DirectCast(WebRequest.Create(url), HttpWebRequest)
        Dim response As HttpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse)
        Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
        Dim o As JObject = JObject.Parse(reader.ReadToEnd)

        reader.Close()
        response.Close()

我已经检查过了，o（JObject）有相关信息

---

我现在需要处理这些数据，但为了避免在开发时产生成本（数据来自付费服务），我有一个输出示例，并将其保存为文件。如何修改上述代码，以便临时读取文件而不是处理响应。理想情况下，我希望它仍然是一个作业对象。

要从磁盘上的文件中读取，请用以下代码替换您的代码：

Dim json As String = File.ReadAllText(@"c:\wherever\whatever.txt")
Dim o As JObject = JObject.Parse(json)