网站首页
汉语字词
英语词汇
考试资料
写作素材
旧版资料
请输入您要查询的范文:
标题
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
随便看
儒林外史个人读书笔记800字范文
2023《简爱》读书笔记600字作文5篇
2021朝花夕拾读书笔记500字六篇
2023朝花夕拾中学生读书笔记【5篇】
水浒传读书笔记_水浒传读后感精选5篇
名著《追风筝的人》经典读后感七篇
名著《安娜卡列尼娜》经典读后感七篇
《安娜卡列尼娜》小说学生读后感7篇
名著《狼王梦》经典读后感七篇
《狼王梦》小说学生读后感7篇
水浒传读书笔记摘抄范文5篇
《艾青诗选》读书笔记范文五篇
《昆虫记》读书笔记800字7篇
《昆虫记》读后感作文800字7篇
《昆虫记》800字读后感【7篇】
名著《昆虫记》读后感500字7篇
初中生《傅雷家书》读后感
《傅雷家书》读后感800字范文
《昆虫记》读后感500字【7篇】
《昆虫记》阅读感想【10篇】
傅雷家书读后感1000字范文
《安徒生童话》读书笔记范文5篇
高中生傅雷家书读后感
《傅雷家书》个人读后感及心得十篇
傅雷家书读后感六百字以上
neonatal period
neonate
neonicotinoid
neon light
neon tube
neo-paganism
neo-paganism
neophyte
neoplasia
neoplasm
犯得着
犯心
犯忌
犯怵
犯恶
犯愁
犯憷
犯戒
犯案
犯法
2016年龙岩市新罗区招聘全科医生特设岗位工作人员条件
2016年贵阳市贵安新区地税局招聘4名工作人员启事
2016年许昌市东城区邓庄乡人民政府招聘工作人员简章
2016年郑州市惠济区招聘高层次和紧缺人才公告
2016年郑州惠济新区下属事业单位招聘职位表
2016年河南省特种设备安全检测研究院平顶山分院招聘报名时间及入口
2016年贵阳市城市综合执法支队特勤队员招聘简章
2016年河南省特种设备安全检测研究院平顶山分院招聘联系方式
2016年河南省特种设备安全检测研究院平顶山分院招聘相关待遇
南京市质量技术监督局所属事业单位2016年上半年招聘人员拟聘用人员名单公示
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。
Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/9/25 17:31:46