以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  遍历JSON数据到Textbox中  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175605)

--  作者：happy2010 --  发布时间：2022/3/11 10:40:00 --  遍历JSON数据到Textbox中 请教老师，遍历出来的数据如何组合成一段字符串输出到Textbox中。 Dim jo As JObject = Jobject.Parse(ClipBoard.GetText) If jo("Result")("Sentences") IsNot Nothing Then     For Each jt As JToken In jo("Result")("Sentences")         Output.Show( jt("Text").ToString)     Next End If

--  作者：有点蓝 --  发布时间：2022/3/11 10:42:00 --   dim s as string = ""     For Each jt As JToken In jo("Result")("Sentences")         s = s & jt("Text").ToString     Next Output.Show(s )

--  作者：happy2010 --  发布时间：2022/3/11 10:58:00 --   老师您给的代码会带json结构数据，如何只提取jt("Text")文字内容呢。

--  作者：有点蓝 --  发布时间：2022/3/11 10:59:00 --   没看懂，请截图、举例说明一下

--  作者：happy2010 --  发布时间：2022/3/11 11:04:00 --   抱歉 我是代码调试错误了，老师给的代码是正确的，非常感谢