随机抽签工具

CarrotMe · 发表于 2026-1-27 21:25

用VB做的简单的随机工具，很简单，看下图

随机抽签助手.rar (214.03 KB, 下载次数: 24)

其实很简单，就是生成随机数

Public Function RndNum(mMin As Long, mMax As Long) As Long
Dim MinTmp As Long
Randomize
RndNum = Int((mMax - mMin + 1) * Rnd() + mMin)
End Function

picoyiyi · 发表于 2026-1-27 21:36

太棒了，可以拿来抽值班！

li000yu · 发表于 2026-1-27 21:42

哈哈，这个有意思

cux666 · 发表于 2026-1-27 22:19

有一个类似的，这个我也喜欢。

apple3721 · 发表于 2026-1-27 22:47

这个好~！大家在一起娱乐，有工具了~！

BayMax2911 · 发表于 2026-1-27 23:55

太好了，可以拿来摇双色球的号码。

BayMax2911 · 发表于 2026-1-27 23:57

BayMax2911 发表于 2026-1-27 23:55
太好了，可以拿来摇双色球的号码。

老哥，该修Bug啦。Windows11 打开后，菜单栏上的文件 → 退出，没反应。。

hhbob23 · 发表于 2026-1-28 00:17

明天就去买彩票

帐号		自动登录	找回密码
密码			注册[Register]

[原创工具] 随机抽签工具

免费评分

浏览过的版块