VBS 生成不重复随机数代码[0-10]-范文、应用文-IT技术专栏-脚本栏目-范文大全-在线学习网

网站首页汉语字词英语词汇考试资料写作素材旧版资料

标题	VBS 生成不重复随机数代码[0-10]
范文	代码如下: dim Z(10),i for i=0 to 10 Z(I)=GetRnd(i-1) WScript.Echo (Z(i)) NEXT Function GetRnd(n) Dim i,X Randomize X=CInt(10*Rnd() ) For i=0 To n If X=Z(i) Then X=GetRnd(n) Exit For End If Next GetRnd=X End Function
随便看	2021班主任期末评语简洁班主任评语大学100字左右班主任评价班委的话50句班主任对班干部的评语范文小学班主任通知书评语范文 2020优秀学生期末评语大全90条 2020高中班主任期末评语50字内精选70条高中班主任期末评语精选70条 2020初中班主任期末评语大全80条班主任对优秀学生期末评语精选80条 2020小学班主任对优秀学生的评语精选80条 2020小学生班主任期末评语大全80条假期高中班主任评语实习评定表班主任评语省三好学生班主任评语社会实践鉴定班主任评语七年级班主任评语集锦小学高年级班主任学期优秀评语 2020年度五年级优等生班主任评语低年级班主任的评语精选四年级学生期末的班主任评语三年级期末班主任评语大全最新小学六年级期末班主任评语高二期末班主任对学生的精选评语六年级上学期班主任对学生评语 snarfing snaring snark snarky snarl snarled snarled up snarled-up snarling snarl-up 磻磼磽磾磿礀礁礂礃礄南充市科学技术协会2019年遴选机关工作人员公告德阳天府生态智谷工作委员会2019年遴选参公管理人员拟转任人员公示 2019年贵阳市卫生健康局市计划生育协会遴选公务员综合成绩公告曲靖市纪委监委2019年遴选公务员体检、考察情况及拟遴选公示宜宾市叙州区2019年考试选调乡镇、街道机关工作人员公告 2019年通辽市住房公积金管理中心选调科级干部取消公告 2019年南通市应急管理局遴选参照公务员法管理工作人员公告株洲市醴陵市纪委监委2019年选调工作人员补充公告 2019年曲靖市会泽县钟屏街道遴选公务员体检结果及拟遴选公示 2019年毕节市大方县九驿街道办事处遴选工作人员面试成绩公示

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板，是学习及工作的有利工具。