代码是什么意思

[复制链接]
查看11 | 回复1 | 2008-11-7 15:55:20 | 显示全部楼层 |阅读模式
if admin25175="" then

dim rndnum
'经过转化的随机数

dim truenum
'最终确定的随机数

Randomize
'初始化随机数生成器

Do While Len(truenum)<4

rndnum=CStr(Chr((57-48)*rnd+48))

truenum=truenum&rndnum

loop

回复

使用道具 举报

千问 | 2008-11-7 15:55:20 | 显示全部楼层
生成一个4位数的随机码。...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行