找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 5447|回复: 2

[已回复] 如何实现读取文本后随机输出一行内容

[复制链接]

1

主题

0

回帖

2

积分

学前班

鲜花
0
猫粮
3
发表于 2018-9-23 22:56:31 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
应该怎么写
楼主热帖
  • 打卡等级:坠落山崖

1082

主题

2110

回帖

4294

积分

院长

鲜花
7
猫粮
6352
QQ
发表于 2018-9-25 14:26:48 | 显示全部楼层
[按键精灵] 纯文本查看 复制代码
Import "zm.luae" //导入插件,只需执行一次
zm.Init  //初始化插件,只需执行一次

Dim path = "/sdcard/紫猫学院.txt"
zm.FileWrite path, {"欢迎加入紫猫学院,", "紫猫老师QQ: 345911220 ", "免费交流QQ群: 7333555"}

//读取文件并把每一行内容保存到数组txt中
Dim txt = zm.FileReadLines(path)

//随机获取一个数组元素值
Dim s = zm.RndArrElement(txt)
TracePrint s


0

主题

13

回帖

13

积分

学前班

鲜花
0
猫粮
376
发表于 2018-9-26 22:06:56 | 显示全部楼层
谢谢紫猫老大的分享~~
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|紫猫编程学园

GMT+8, 2024-5-2 16:57

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表