Foxtable(狐表)用户栏目专家坐堂 → For的用法


  共有112人关注过本帖树形打印复制链接

主题:For的用法

帅哥,在线噢!
hongye
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
For的用法  发帖心情 Post By:2024/12/20 10:55:00 [只看该作者]

    "CommodityPrice": [
      {
        "row": "1",
        "word": "29.2035398230089"
      },
      {
        "row": "2",
        "word": "29.2035398230089"
      },
      {
        "row": "3",
        "word": "29.2035398230089"
      },
      {
        "row": "4",
        "word": "29.2035398230089"
      },
      {
        "row": "5",
        "word": "29.2035398230089"
      },
      {
        "row": "6",
        "word": "35.3982300884956"
      },
      {
        "row": "7",
        "word": "35.3982300884956"
      },
      {
        "row": "8",
        "word": "35.3982300884956"
      },
      {
        "row": "9",
        "word": "35.3982300884956"
      },
      {
        "row": "10",
        "word": "35.3982300884956"
      }
    ],
如上文本行数有时候为10行有时候只有1行,请问怎么用For写代码?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111325 积分:566671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/20 11:07:00 [只看该作者]


 回到顶部
帅哥,在线噢!
hongye
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2024/12/20 12:41:00 [只看该作者]

                    Dim jo As JObject = JObject.Parse(result.Tostring)
                    Dim Value1 As String
                    For Each jt As JToken In jo("words_result")("CommodityName")
                        Value1 = jt("row").ToString & "|" & jt("word").ToString
                    Next
这个可以用一个数组,但是还有其他的数组,怎么写代码?
   "CommodityNum": [
      {
        "row": "1",
        "word": "360"
      },
      {
        "row": "2",
        "word": "480"
      },
      {
        "row": "3",
        "word": "240"
      },
      {
        "row": "4",
        "word": "60"
      },
      {
        "row": "5",
        "word": "60"
      },
      {
        "row": "6",
        "word": "360"
      },
      {
        "row": "7",
        "word": "480"
      },
      {
        "row": "8",
        "word": "240"
      },
      {
        "row": "9",
        "word": "60"
      },
      {
        "row": "10",
        "word": "60"
      }
    ],
    "CommodityAmount": [
      {
        "row": "1",
        "word": "10513.27"
      },
      {
        "row": "2",
        "word": "14017.70"
      },
      {
        "row": "3",
        "word": "7008.85"
      },
      {
        "row": "4",
        "word": "1752.21"
      },
      {
        "row": "5",
        "word": "1752.21"
      },
      {
        "row": "6",
        "word": "12743.36"
      },
      {
        "row": "7",
        "word": "16991.15"
      },
      {
        "row": "8",
        "word": "8495.58"
      },
      {
        "row": "9",
        "word": "2123.89"
      },
      {
        "row": "10",
        "word": "2123.89"
      }
    ],
    "InvoiceType": "电子fa piao(专用fa piao)",
    "AmountInWords": "捌万柒仟陆佰圆整",
    "TotalTax": "10077.89",
    "MachineCode": "",
    "City": "",
    "InvoiceNumDigit": "",
    "Checker": "",
    "InvoiceCode": "",
    "SellerAddress": "",
    "CommodityPrice": [
      {
        "row": "1",
        "word": "29.2035398230089"
      },
      {
        "row": "2",
        "word": "29.2035398230089"
      },
      {
        "row": "3",
        "word": "29.2035398230089"
      },
      {
        "row": "4",
        "word": "29.2035398230089"
      },
      {
        "row": "5",
        "word": "29.2035398230089"
      },
      {
        "row": "6",
        "word": "35.3982300884956"
      },
      {
        "row": "7",
        "word": "35.3982300884956"
      },
      {
        "row": "8",
        "word": "35.3982300884956"
      },
      {
        "row": "9",
        "word": "35.3982300884956"
      },
      {
        "row": "10",
        "word": "35.3982300884956"
      }


 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4771 积分:34663 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2024/12/20 13:23:00 [只看该作者]

想得到啥结果,还不如用正则表达式呢

 回到顶部
帅哥,在线噢!
hongye
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2024/12/20 13:30:00 [只看该作者]

怎么写?

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4771 积分:34663 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2024/12/20 13:32:00 [只看该作者]

想得到啥结果?

 回到顶部
帅哥,在线噢!
hongye
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2024/12/20 13:33:00 [只看该作者]

每一项的每行结果添加到表中

 回到顶部
帅哥,在线噢!
hongye
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2024/12/20 13:41:00 [只看该作者]

CommodityName,CommodityType,CommodityUnit,CommodityNum,CommodityPrice,CommodityAmount,CommodityTaxRate,CommodityTax,中的每行数据分别填入表中以下列
货物名称,规格型号,单位,数量,单价,金额,税率,税额

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111325 积分:566671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/20 13:46:00 [只看该作者]

                    For Each jt As JToken In jo("words_result")("CommodityName")
                        Value1 = jt("row").ToString & "|" & jt("word").ToString
                    Next
                    For Each jt As JToken In jo("words_result")("CommodityType")
                        Value1 = jt("row").ToString & "|" & jt("word").ToString
                    Next
……

 回到顶部
帅哥,在线噢!
hongye
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:470 积分:3166 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2024/12/20 13:49:00 [只看该作者]

这样是可以,但是咋样能将数据填入表的每一行呢
也就是增加行放哪里?
[此贴子已经被作者于2024/12/20 14:01:39编辑过]

 回到顶部
总数 19 1 2 下一页