以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  长代码换行问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191114)
--  作者：zhangjian222200
--  发布时间：2024/3/28 10:15:00
--  长代码换行问题
换行不成功

代码：
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:1233356.txt
--  作者：zhangjian222200
--  发布时间：2024/3/28 10:19:00
--  
Dim a As String = "张三"
Dim b As String = "李四"
Dim json As String = "{\'touser\':[\'" & a & "\', \'" & b & "\'],\'msgtype\':\'text\'}"
Dim jo As JObject = JObject.Parse(json)
Output.Show(jo.ToSTring)



这样，是能成功的
换行，就不行
[此贴子已经被作者于2024/3/28 10:19:45编辑过]
--  作者：有点蓝
--  发布时间：2024/3/28 10:22:00
--  
Dim json As String = "{\'touser\':[\'" & a & _
                               "\', \'" & b & _
                               "\', \'" & c & _
                               "\'],\'msgtype\':\'text\'}"