[求助]生成xml提示错误，复制帮助的原代码也是错误？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

自己的代码：

Dim r As Row = Tables("自媒体中间库").current

Dim zps1 As List(of String)

zps1= r.DataRow.Lines("第1步截图")

Dim xo As New XObject

For n As Integer = 0 To zps1.Count-1

xo("标题") = r("标题")

xo("图片地址") = ProjectPath & "attachments/zjkphoto/" & zps1(n)

MessageBox.show(xo.ToXML)

此主题相关图片如下：111.jpg

//帮助里的
Dim jo As New XObject
jo("Name") = "张三"
jo("Group") = "VIP"
jo("Roles") = New Jarray("manager","developer") '定义数组
jo("Type") = 2
Output.Show(jo.ToXML)

此主题相关图片如下：222.jpg

主题：[求助]生成xml提示错误，复制帮助的原代码也是错误？