给大家带来的是一个取歌词的软件,想要什么歌的歌词就能搜索到什么歌的歌词,非常的方便。我强调的不是功能是一些小技巧,这个软件的实现原理就是取网络元素,非常的方便,我还录了一期视频加QQ:1454144616就能看。虽说功能的实现非常简单,但是很多对于很多对易语言感兴趣但是还不敢迈出那重要一步的同学们来说这个视频可能是对你们兴趣的一个提升吧,很多大神也不要说我,我不是来炫耀什么,我只是一个讲师,我希望能给更多的人提供帮助!
源码如下:
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 取歌词 (“http://www.lrcgc.com/so/?q=” + 编码_URL编码 (编辑框_Name.内容, 真, 真) + “&csrf_token=4e6d8e5a66cdad3b”)变量名 | 类 型 | 静态 | 数组 | 备 注 | 源文件 | 文本型 | | | 标志 | 文本型 | | | 歌词 | 文本型 | | | 歌词段 | 文本型 | | 0 | i | 整数型 | | |
列表框1. 清空 ()源文件 = 网页_访问S (address, 0, , , , )如果真 (寻找文本 (源文件, #address_left, , 假) = -1 )信息框 (“没有标志文本!”, 0, , )返回 ()标志 = 文本_取出中间文本 (源文件, #address_left, #address_right, )标志 = “http://www.lrcgc.com/lyric-” + 标志 源文件 = 网页_访问S (标志, 0, , , , )歌词 = 文本_取出中间文本 (源文件, #geci_left, #geci_right, )歌词段 = 分割文本 (歌词, “ ”, ) 如果真 (取数组成员数 (歌词段 ) = 0 )信息框 (“没有找到歌词段!”, 0, , )返回 ()计次循环首 (取数组成员数 (歌词段 ), i )列表框1. 加入项目 (歌词段 [i ], )计次循环尾 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | i | 整数型 | | | 复制歌词 | 文本型 | | | 计次循环首 (列表框1. 取项目数 (), i )复制歌词 = 复制歌词 + 列表框1. 取项目文本 (i - 1 )计次循环尾 ()置剪辑板文本 (复制歌词 )|
address_left | <文本长度: 16> | | address_right | <文本长度: 18> | | geci_left | <文本长度: 26> | | geci_right | <文本长度: 4> | |
取歌词.rar
(150.71 KB, 下载次数: 82)
|