好友
阅读权限35
听众
最后登录1970-1-1
|
本帖最后由 JusonR 于 2019-11-19 23:58 编辑
再点查询时清空列表框内容,后面读取优化了下,只读取3个算什么.?
.版本 2
.支持库 iext
超级列表框1.全部删除 ()
.如果真 (单选框1.选中)
.如果真 (编辑框1.内容 = “”)
信息框 (“请输入歌曲名字”, 48, “提醒”, )
返回 ()
.如果真结束
url = “http://www.duoee.com/music/api.p ... 93608_1574178098126”
tj = “types=search&count=30&source=netease&pages=1&name=” + 编辑框1.内容
返回结果 = 编码_usc2到ansi (到文本 (网页_访问_对象 (url, 1, tj, , , #xyt, , , , , , , , , , , )))
文本_取中间_批量 (返回结果, #id, “,”, 歌曲ID数组, , , , , , , )
文本_取中间_批量 (返回结果, #mz, #引号 + “,”, 歌曲名字数组, , , , , , , )
文本_取中间_批量 (返回结果, #zz, #引号 + “]”, 歌曲作者数组, , , , , , , )
.计次循环首 (取数组成员数 (歌曲ID数组), i)
i = 超级列表框1.插入表项 (, , , , , ) ' 第一次插入
超级列表框1.置标题 (i, 0, 歌曲ID数组 [i + 1])
超级列表框1.置标题 (i, 1, 歌曲名字数组 [i + 1])
超级列表框1.置标题 (i, 2, 歌曲作者数组 [i + 1])
.计次循环尾 ()
|
免费评分
-
查看全部评分
|