您正在使用IPV4(35.153.166.111)访问本站 您本次共访问本站 1 次
 用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器 行情 简化版
文明驾车我带头,文明行路我带头,礼貌让座我带头      

[公益] 节省一分零钱 献出一份爱心 温暖世间真情       【腾讯云】云产品限时秒杀,爆款1核2G云服务器,首年74元      
虚位以待
2021年 冬至节 14
2021年 圣诞节 18
2022年 元 旦 25
2022年 春 节 56
 
  • 本类新增
    本类热门文章
    您现在的位置:首页 >> ASP/ASP.net >> 内容
    产生在1到50内的10个随机数
    内容摘要: functionshowrnd(x,y)'第一个参数要得到多少个数,第二个指定最ifyxthenexitfunctionendifredimn(x)dimi,qdimisokfori=1to10Randomizen(i)=round((y-1)*Rnd)+1isok=falsedowhilenotisokforq=1toiifn(i)=n(q-1)thenn......
    functionshowrnd(x,y)'第一个参数要得到多少个数,第二个指定最

    ify<xthen

    exitfunction

    endif

    redimn(x)

    dimi,q

    dimisok

    fori=1to10

    Randomize

    n(i)=round((y-1)*Rnd)+1

    isok=false

    dowhilenotisok

    forq=1toi

    ifn(i)=n(q-1)then

    n(i)=Int((y-1)*Rnd)+1

    isok=false

    exitfor

    endif

    isok=true

    next

    loop

    response.writen(i)&<br>

    next

    endfunction

    上一篇:检测是否有效的数字 下一篇:字符串长度切割,超过显示省略号
    发布日期:2021/11/22
    手机扫二维码直达本页
    发布时间:18:27:01
    点击:155
    录入:壹家怡园
    相关文章
    Baidu
    YiJiaCMS 6.0.9.10888 Build 21.11.30(MSSQL) 闽ICP备05000814号-1
    本空间由腾讯云(轻量应用服务器)提供,百度云加速提供加速防护
    ©2000-2021