输入地区名字按顺序生成当地区号的归属地软件

易语言 2020-03-08 21:21:08

输入地区名字按顺序生成当地区号的归属地软件

调用了精易和鱼刺模块都可以自行下载。

开头 = 号段组.文本 [索引] [2]
i = 1
总文本 = “”
.计次循环首 (10000, i)
总文本 = 总文本 + #换行符 + 开头 + 取文本右边 (到文本 (10000 + i), 4)
.计次循环尾 ()
写到文件 (取当前目录 () + “/存储/” + 开头 + “.txt”, 到字节集 (总文本))