总结json值

时间:2018-03-23 20:46:45

标签: json vb.net

我试图总结json中包含字符串"示例"的所有值。但我不知道该怎么做。 我正在使用" Newtonsoft.Json"框架。

 {
      "Example1344": 13,
      "Example925": 16,
      "Example454Example": 24,
      "Nothing": 51,
      "Other9235": 45
      }

结果将是53

1 个答案:

答案 0 :(得分:-1)

这些方面的某些内容可能适合您:

Imports Newtonsoft.Json.Linq

Module Module1

    Sub Main()

        Dim json As String = $"{{
          ""Example1344"": 13,
          ""Example925"": 16,
          ""Example454Example"": 24,
          ""Nothing"": 51,
          ""Other9235"": 45
          }}"

        Dim model As JObject = JObject.Parse(json)
        Dim value As Int16 = 0

        value = model.Properties _
            .Where(Function(m) m.Name.Contains("Example")) _
            .Sum(Function(m) m.Value)

        Console.WriteLine($"Sum: {value}")

        Console.WriteLine("PRESS ANY KEY TO EXIT")
        Console.ReadKey(True)
    End Sub

End Module