随机数

ycploveyu · 发表于 2018-3-21 13:01:27

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

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

×

随机生成多少个数的随机数例子比较少
不好意思,上次传的附件是空的,谢谢老师提醒,
我直接粘贴到下面好了.

[按键精灵] 纯文本查看 复制代码

Import "zm.luae" 
TracePrint RndFunction(9)

Function RndFunction(Number)
    Dim a,b,Num
    Do 
        a =CLng( UTF8.Right("100000000000000000", Number))
        b = CLng(UTF8.Right("999999999999999999", Number))
        Num = zm.RndNum(a, b)
        If Len(CStr(Num)) = Number Then 
            RndFunction = Num
            Exit Function  
        End If
        Delay 100
    loop
End Function

紫猫 · 发表于 2018-3-21 14:13:36

你脚本是不是传错了呢?这个是空脚本, 没有任何代码

ycploveyu · 发表于 2018-3-23 19:57:35

紫猫发表于 2018-3-21 14:13
你脚本是不是传错了呢?这个是空脚本, 没有任何代码

谢谢老师提醒,是我搞错了.

ycploveyu · 发表于 2018-4-9 18:05:28

原来老师早就把这个随机数写出来了,而且很全面,之前都没注意看,只知道老师有随机数的插件.
大家就把这个例子拿去学习吧.
老师的插件链接是:https://zimaoxy.com/m/post/zm.rndstr/

q315767552 · 发表于 2020-12-8 21:01:32

很给力!

q315767552 · 发表于 2020-12-18 18:58:29

♪(^∇^*)♪(^∇^*)♪(^∇^*)♪(^∇^*)♪(^∇^*)♪(^∇^*)♪(^∇^*)

		自动登录	找回密码
密码			立即注册

[教程源码] 随机数

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

评分