新微赢技术网

标题: 那位大哥帮帮忙呀,我万分感谢! [打印本页]

作者: 海的无奈    时间: 2010-1-13 05:24
标题: 那位大哥帮帮忙呀,我万分感谢!
function mygenkey(mylen) if mylen<>"" then randomize myvalidcode="" do while len(myvalidcode)<mylen myvalidcode=myvalidcode&Int(10*Rnd) loop mygenkey=myvalidcode else mygenkey="error" end if end function
那位大哥帮我看看这个函数,我想修改成这样。产生一个10位的随机数,前面五位不变,固定为04443,后面五位变化,但是产生的随机数必须大于0444309999,但是要求产生的要是比如0444333111,0444333222,0444333333。。。到0444333999就继续产生,也就是不能让用户得到这样的随机数。
作者: 瘋子愛老婆    时间: 2010-1-13 05:24
你就生成5个随机数 第一个是1~9 其余四个是0~9 再与04443相连接得到的字符串str
str1=0444333111&amp;"+"&amp;0444333222&amp;"+"&amp; ……
如果 instr(str1,str) 就重新生成否则就是满足你的要求了




欢迎光临 新微赢技术网 (http://bbs.weiying.cn/) Powered by Discuz! X3.2