VBS 生成不重复随机数代码[0-10]
导读：收集整理的这篇文章主要介绍了VBS 生成不重复随机数代码[0-10]，觉得挺不错的，现在分享给大家，也给大家做个参考。 复制代码 代码如下:dim Z(10 ,i for i=0 to...
收集整理的这篇文章主要介绍了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
您可能感兴趣的文章:
- php array_flip() 删除数组重复元素
- php 移除数组重复元素的一点说明
- 新人报道，发个小技巧(js数组重复判断)
- javascript下过滤数组重复值的代码
- asp 数组 重复删除函数(增强版)
- PHP array_flip() 删除重复数组元素专用函数
- Javascript 去除数组的重复元素
- js获取数组任意个不重复的随机数组元素
- js删除select中重复项的实现代码
- js 巧妙去除数组中的重复项
- javascript 删除数组中重复项（uniq）
- javascript 返回数组中不重复的元素
- ASP 过滤数组重复数据函数(加强版)
声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！
若转载请注明出处： VBS 生成不重复随机数代码[0-10]
本文地址： https://pptw.com/jishu/609827.html