• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.5
软件大小:62.5M
更新时间:9-25

按键精灵iOS版
立即下载

软件版本:1.3.5
软件大小:29.2M
更新时间:06-14

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
返回列表 12345678» / 19
发新话题 回复该主题

[源码分享] 随机中文生成器 [复制链接]

1#
感谢玮神
再次感谢玮神

2#

随机中文

1随机,大家都会rnd()
2中文,一般像我这样的小白都是说,从文档里读取呗。


但是,玮神发过的插件你们注意没,有个『Unicode2Utf8』
这个宝贝不用太可惜了,下面上代码

3#

  1. 'u4e00-u9fa5 十六进制 中文范围
  2. '19968-40869 转为十进制
  3. '随机中文生成器
  4. delay 2000
  5. import "shanhai.lua"
  6. Dim 数字,汉字个数,单个汉字,生成的句子
  7. for 6
  8. 生成的句子=""
  9. Randomize
  10. 汉字个数=Int(((30-(1)+1)*Rnd())+1)
  11. for 汉字个数
  12. 数字=Int(((40869-(19968)+1)*Rnd())+19968)
  13. 数字=cstr("\\u"&(hex(数字)))
  14. 单个汉字=shanhai.Unicode2Utf8(数字)
  15. 生成的句子=生成的句子&单个汉字
  16. next
  17. sm(生成的句子)
  18. next

  19. sub sm(s)
  20. showmessage s
  21. delay 2000
  22. end sub
复制代码

4#
5#

好东西必须支持,感觉楼主~~~

6#

支持一下

按键精灵安卓版2.5.0即将发布,将带给你更好的编辑体验!点击链接了解新版本功能,还有更多好礼等你来拿哦!
http://bbs.anjian.com/showtopic-584866.aspx
7#

这么叼

8#

dbgsd

9#

而我认为惹我

10#

我认为惹

11#

  1. RE:随机中文生成器修改
复制代码

12#

010是打发打发

13#

唉唉唉唉唉

14#

学习学习

15#

感谢

16#

54554545

17#

看看感谢

18#

很好,很强大

19#

感谢博士

20#

qqqqqqqqq

发新话题 回复该主题