zssm 发表于 2020-12-23 20:26:57

来个文本分割的高手分割一下

本帖最后由 zssm 于 2020-12-24 00:02 编辑

变量 取回的信息 为 文本型
变量 标题 为 文本型
变量 价格 为 文本型
变量 地址 为 文本型
变量 介绍 为 文本型
变量 库存 为 文本型


取回的信息 = "http://m.qpic.cn/ps8b?/V12FxILq1BMX1c/zIwEn8AV1v6fRPvlw10LJWqLI7c9ZZaD1YB**wZ0Sts!/b/dLYAAAAAAAAA&bo=OASgBTgEoAURCT4!&rf=viewer_4|.+.|板凳(6成新)|.+.|100|.+.|5|.+.|寄售商品|.+.||.*.|http://m.qpic.cn/ps8b?/V12FxILq1BMX1c/zIwEn8AV1v6fRPvlw10LJWqLI7c9ZZaD1YB**wZ0Sts!/b/dLYAAAAAAAAA&bo=OASgBTgEoAURCT4!&rf=viewer_4|.+.|板凳(6成新)|.+.|100|.+.|7|.+.|寄售商品|.+.||.*.|http://m.qpic.cn/ps8b?/V12FxILq1BMX1c/zIwEn8AV1v6fRPvlw10LJWqLI7c9ZZaD1YB**wZ0Sts!/b/dLYAAAAAAAAA&bo=OASgBTgEoAURCT4!&rf=viewer_4|.+.|板凳(6成新)|.+.|100|.+.|8|.+.|寄售商品|.+.||.*.|"
    变量 待分割文本 为 文本型
    变量 子文本数组 为 文本型()
    变量 子文本 为 文本型()
    变量 a 为 整数型=0
    变量 计次 为 整数型=0
    待分割文本 = 取回的信息
    子文本数组 = 分割文本(待分割文本,"|.*.|")
    判断循环首 a < 取数组成员数(子文本数组)
    子文本 = 分割文本(子文本数组(a),"|.+.|")
      地址 = 子文本(0)
      标题 = 子文本(1)
      价格 = 子文本(2)
      库存 = 子文本(3)
      介绍 = 子文本(4)
    a = a + 1
      判断循环首 计次 < 取数组成员数(子文本数组)
      购物列表框1.添加项目(地址,标题,价格,库存,"",介绍,"","","",假)      
      计次 = 计次 + 1
      判断循环尾
      判断循环尾


这种方式只能取到一个不能循环添加！   我理想目的是： 取到的源码分割并且添加到购物列表款中！（不重复）



已搞定！请勿回复！


源码如下：
过程 开始解析图片地址()
        取回的信息 = MySQL_查询记录(表名,字段,"")
        变量 待分割文本 为 文本型
    变量 全文本数组 为 文本型()
    变量 取出文本 为 文本型()
    变量 计次 为 整数型
    待分割文本 = 取回的信息
    全文本数组 = 分割文本(待分割文本,"|.*.|")
    判断循环首 计次 < 取数组成员数(全文本数组)
    取出文本 = 分割文本(全文本数组(计次),"|.+.|")
      地址 = 地址 & 取出文本(0) & "=="
      标题 = 标题 & 取出文本(1) & "=="
      价格 = 价格 & 取出文本(2) & "=="
      库存 = 库存 & 取出文本(3) & "=="
      介绍 = 介绍 & 取出文本(4) & "=="
      计次 = 计次 + 1
    判断循环尾
        开始匹配文本()
结束 过程


过程 开始匹配文本()
        变量 全标题 为 文本型()
        变量 全价格 为 文本型()
        变量 全库存 为 文本型()
        变量 全地址 为 文本型()
        变量 全介绍 为 文本型()
        变量 计次 为 整数型 = 0
        全标题 = 分割文本(标题,"==")
        全价格 = 分割文本(价格,"==")
        全库存 = 分割文本(库存,"==")
        全地址 = 分割文本(地址,"==")
        全介绍 = 分割文本(介绍,"==")
        判断循环首计次 < 取数组成员数(全标题)
        购物列表框1.添加项目(全地址(计次),全标题(计次),全价格(计次),"库存："&全库存(计次),"",全介绍(计次),"","","",假)
        计次 = 计次 + 1
        判断循环尾
结束 过程


事件 购物列表框1.表项被单击(索引 为 整数型)
        仿IOS对话框1.弹出对话框2("详情",购物列表框1.取项目标记(索引),"OK",真)
结束 事件


yx2018 发表于 2020-12-23 21:14:04

你这是发的啥哟

刘mian 发表于 2020-12-23 21:22:19

'你是需要这个意思的吧？



变量 待分割文本 为 文本型
    变量 子文本数组 为 文本型()
    变量 子文本 为 文本型()
    变量 a 为 整数型=0
        编辑框1.内容=""
    待分割文本 = "http://m.qpic.cn/ps8b?/V12FxILq1BMX1c/zIwEn8AV1v6fRPvlw10LJWqLI7c9ZZaD1YB**wZ0Sts!/b/dLYAAAAAAAAA&bo=OASgBTgEoAURCT4!&rf=viewer_4|.+.|板凳(6成新)|.+.|100|.+.|5|.+.|寄售商品|.+.||.*.|http://baidu.con|.+.|百度)|.+.|50|.+.|3|.+.|网站|.+.||.*.|"
    子文本数组 = 分割文本(待分割文本,"|.*.|")
   
    判断循环首 a <取数组成员数(子文本数组)
        子文本 = 分割文本(子文本数组(a),"|.+.|")
编辑框1.内容=编辑框1.内容 &"\n地址"&子文本(0)&"\n名称" &子文本(1)&"\n价格 "&子文本(2)& "\n销量"&子文本(3)&"\n详情"&子文本(4)
       
      a = a + 1
    判断循环尾

zssm 发表于 2020-12-23 21:27:51

刘mian 发表于 2020-12-23 21:22
'你是需要这个意思的吧？




这不是萌新的源码嘛！！

刘mian 发表于 2020-12-23 21:29:08

zssm 发表于 2020-12-23 21:27
这不是萌新的源码嘛！！

能用就行呗管他啥源码呢 你说是不？

zssm 发表于 2020-12-23 21:39:24

本帖最后由 zssm 于 2020-12-23 21:49 编辑

刘mian 发表于 2020-12-23 21:29
能用就行呗管他啥源码呢 你说是不？
这种只能充源码里取到头一个！后面的没的搞！

sqdwvf 发表于 2020-12-24 00:19:45

逻辑不对，既然你都逐一赋值了，那你还进行内部循环是几个意思，直接去掉




    判断循环首 a < 取数组成员数(子文本数组)
          子文本 = 分割文本(子文本数组(a),"|.+.|")
      地址 = 子文本(0)
      标题 = 子文本(1)
      价格 = 子文本(2)
      库存 = 子文本(3)
      介绍 = 子文本(4)
          a = a + 1
                购物列表框1.添加项目(地址,标题,价格,库存,"",介绍,"","","",假)
    判断循环尾       

刘mian 发表于 2020-12-24 19:58:29

本帖最后由 刘mian 于 2020-12-24 20:01 编辑

......无语了

刘mian 发表于 2020-12-24 20:05:35

sqdwvf 发表于 2020-12-24 00:19
逻辑不对，既然你都逐一赋值了，那你还进行内部循环是几个意思，直接去掉




他应该是看不懂我发的那个

dxs405 发表于 2021-5-31 14:21:06

正则了解一下
页: [1]
查看完整版本: 来个文本分割的高手分割一下