ASP
本类阅读TOP10
作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站
'生成任意位随机数的函数'strLong是随机数字的位数,数字型Function rndNum (strLong) Dim temNum Randomize Do While Len(RndNum) < strLong temNum=CStr(Chr((57-48)*rnd+48)) RndNum=RndNum&temNum loopEnd Function
相关软件: