以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  json 代码编译  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128722)

--  作者:lime7523
--  发布时间:2018/12/13 16:25:00
--  json 代码编译
假设取到的数据是双引号的,请问下面的代码应该怎么写 
 
Dim json As String = "[{"name":"李云龙","age":"36"},{"name":"黄晓明","age":"28"}]"
Dim ja As JArray = Jarray.Parse(json)
For i As Integer = 0 To ja.Count - 1
    OutPut.Show("姓名:"  & ja(i)("name").ToString() &  "  年龄:" & ja(i)("age").ToString())
Next



--  作者:有点甜
--  发布时间:2018/12/13 18:05:00
--  

1、获取代码是一样的。不论是单引号还是双引号,都一样获取的。

 

2、你这个双引号直接写的时候,要这样写 http://www.foxtable.com/webhelp/scr/0211.htm

 

Dim json As String = "[{""name"":""李云龙"",""age"":""36""},{""name"":""黄晓明"",""age"":""28""}]"

 


--  作者:lime7523
--  发布时间:2018/12/13 18:32:00
--  
自动获取的是双引号的数据,不能对原数据进行再加工,该怎么改后面的代码
--  作者:有点甜
--  发布时间:2018/12/13 20:19:00
--  
以下是引用lime7523在2018/12/13 18:32:00的发言:
自动获取的是双引号的数据,不能对原数据进行再加工,该怎么改后面的代码

 

后面的代码不用改。双引号、单引号都是同样的代码。

 

获取的数据直接贴出来,说明最后要得到什么结果。


--  作者:lime7523
--  发布时间:2018/12/13 22:01:00
--  
以下是原数据
[{"best_ask":"0.00704191","best_bid":"0.00702812","instrument_id":"LTC-BTC","product_id":"LTC-BTC","last":"0.00702807","ask":"0.00704191","bid":"0.00702812","open_24h":"0.00710584","high_24h":"0.00719413","low_24h":"0.00696002","base_volume_24h":"720527.5492255","timestamp":"2018-12-13T13:55:22.526Z","quote_volume_24h":"5088.42241363"},{"best_ask":"0.02635073","best_bid":"0.02634458","instrument_id":"ETH-BTC","product_id":"ETH-BTC","last":"0.02634429","ask":"0.02635073","bid":"0.02634458","open_24h":"0.02608093","high_24h":"0.026413","low_24h":"0.02591442","base_volume_24h":"150340.749385","timestamp":"2018-12-13T13:55:22.526Z","quote_volume_24h":"3930.35978452"}]


最终结果是遍厉写入表中,现在能遍厉显示就行
[此贴子已经被作者于2018/12/13 22:07:28编辑过]

--  作者:有点甜
--  发布时间:2018/12/13 23:16:00
--  

参考代码

 

Dim json As String = ClipBoard.GetText
Dim ja As JArray = Jarray.Parse(json)
For i As Integer = 0 To ja.Count - 1
    OutPut.Show("姓名:"  & ja(i)("best_ask").ToString() &  "  年龄:" & ja(i)("best_bid").ToString())
Next