VBS在指定范围内生成不重复的随机数

最新推荐文章于 2020-11-05 21:11:07 发布
最新推荐文章于 2020-11-05 21:11:07 发布
阅读量1.2k 收藏
点赞数
CC 4.0 BY-SA版权
原文链接：http://www.cnblogs.com/futrueface/p/4221206.html
本文介绍了一段使用VBScript编写的脚本，该脚本能够在指定范围内生成不重复的随机数，并通过一个具体示例展示了实现过程。
VBS在指定范围内生成不重复的随机数


Dim Z()
ReDim Z(15)
For i=0 To UBound(Z)
    Z(i)=GetRndNum(i-1,UBound(Z))
    WScript.Echo Z(i)
Next

Function GetRndNum(n,length)
    Randomize
    x=CInt(length*Rnd)
    For i=0 To n
        If x=Z(i) Then
            x=GetRndNum(n,length)
            Exit For
        End If
    Next
    GetRndNum = x
End Function

posted on 2015-01-13 14:20 futrueface 阅读( ...) 评论( ...) 编辑 收藏

转载于:https://www.cnblogs.com/futrueface/p/4221206.html

【软件开发规范四】《应用系统安全编码规范》
商务合作|问题讨论|交流学习 请联系作者微信，加微信请务必注明来意，博客主页有联系方式
07-18 1235
为落实《信息安全策略》的要求，有效加强应用系统安全管理，提升应用系统安全编码能力，指导开发团队有效进行应用系统安全编码，特制定本规范。
VBS脚本简明教程
jaazure的专栏
09-01 6699
◎Vbs脚本编程简明教程之一—为什么要使用Vbs？在Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第一件事情就是打开WORD，切换到你喜爱的输入法进行文本编辑，同时还要播放优美的音乐给工作创造一个舒心的环境，当然也有可能你经常需要对文本中的某些数据进行整理，把各式各样的数据按照某种规则排列起来……。这些事情重复、琐碎，使人容易疲劳。第三方软件也许可以强化计算机的某些功能，但是解决这些重复劳动往往事
VBS 生成不重复随机数代码[0-10]
09-05
VBS 生成不重复随机数代码[0-10]
用vbs产生的若干个随机数并写入到一个.txt中的代码
09-05
用vbs产生的若干个随机数并写入到一个.txt中的代码，需要的朋友可以参考下。
利用随机函数生成随机数
鱼思故渊的专栏
01-11 4028
给定一个rand()，可以产生从0到RAND_MAX的随机数，其中RAND_MAX很大（常见值:16位int能表示的最大整数32767），写出利用rand()生成[a,b]中任意整数的函数，其中a>=0, b 分析： 这是在编程工作最常见的随机函数的应用，在这里做一个起点再合适不过。把随机数区间的起点从0变为a，同时把一共RAND_MAX+1个数的区间缩小至只含有b-a+1个数的区间，写为 a
VBS生成随机数
weixin_33845477的博客
01-14 3519
  自动化工作中常常遇到因数据重复使业务无法提交的问题，我想到了利用随机数来解决这个问题，下面对VBS生成随机数做下解析： 一、Randomize语句    Randomize ：初始化随机数生成器。   语法 ：Randomize [number]        可选的 number 参数是 Variant 或任何有效的数值表达式。    说明：      Randomize 用 n...
vbs 产生随机数
modian的专栏
09-05 4629
Function getRandom(n)   Dim MyValue, strRandomize   初始化随机数生成器。str=Cint(trim(n))MyValue = Int(str * Rnd)    产生 0 到 n-1 之间的随机数。getRandom=Cint(trim(MyValue))End Function
qtp:vbs基础教程
黄沙百战穿金甲，不破楼兰终不还。
09-29 3158
◎Vbs脚本编程简明教程之一—为什么要使用Vbs？  在Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第一件事情就是打开WORD，切换到你喜爱的输入法进行文本编辑，同时还要播放优美的音乐给工作创造一个舒心的环境，当然也有可能你经常需要对文本中的某些数据进行整理，把各式各样的数据按照某种
VBScript常用函数详解
50. For...Next循环：遍历指定范围内的整数，执行循环体。 51. ForEach...Next循环：遍历集合或数组中的每个元素，执行循环体。 52. FormatCurrency函数：格式化数值为货币样式，可自定义小数位数和货币符号。 53...
这个是我18年整理的，之前在我的电子笔记，现在感觉还是需要分享写写博客大家互相学习更好
hong1243622509的博客
11-05 2546
** 总结功能测试面试常见问题 ** 一、接口测试需要注意什么？ 1、 注意数据清理 在写脚本后注意及时清理接口测试过程中，向数据库或实时搜索中插入的数据，以免脚本的持续运行，会对数据库和实时搜索造成不必要的负担。 2、 在编写脚本前，提前写好用例 接口测试虽然对代码的要求比较高，但是最终影响测试质量的不是代码能力的高低，而是设计用例能力的高低。设计和编写用例是写脚本的前提，是脚本代码实现的对象。所以在动手写脚本前，必须先把用例准备好，如果是新人，则需要请开发和接口测试的前辈帮忙review一下，确保设计的
展示5个不重复随机数
12-06
5次展示不重复的1~5的5个整数数字，直到全部展示完毕结束展示
VB生成不重复的随机数
01-08
VB生成不重复的随机数 我的建议是：第一步、先做一个数组，存上这35个数（可以不是连续的数，也可以是人名、字符串什么的）；第二步、随机生成一个1-35之间的数，输出；第三步：把这个数和数组的第一个单元交换；第四步、从数组的第2-35之间随机抽取第二个数，输出；第五步、把这随机抽取的第二个数和数组的第二个单元内容呼唤；第六步、随机抽取第三个数，输出。。。。。重复到从第35-35个数之间随机抽取一个数，这时直接输出最后一个就行了。
VBS获得随机数，截图函数
weixin_30367945的博客
11-26 358
VBS获得随机数，截图函数 '获取随机数 Public function randonum() 　　Randomize 　　randonum = replace(10000*rnd(),".","a") & "@qq.com" End Function '获取指定范围内的随机数 MAX,MIN RandomizeWScr...
[唐胡璐]VBS技巧 - Generate Random String(产生随机数)
weixin_30872499的博客
01-11 332
Function RandomString( ByVal strLen )         Dim str         Const LETTERS = "abcdefghijklmnopqrstuvwxyz0123456789"    For i = 1 to strLen              str = str & Mid( LETTERS, RandomNumber( 1...
VB小程序：生成十个不重复的随机数
〡TonyべLC 的Blog
02-18 8681
我们通过随机数函数Rnd结合for循环嵌套来实现生成十个不重复的随机数，代码如下：   Option Explicit Dim a(9) As Integer, i As Integer, j As Integer     ‘定义数组及循环变量 Dim Temp As Integer     ’定义一个临时变量存储生成的随机数 Dim Flag As Boolean      ‘定义一
VBScript随机数应用
panhongweiwangxi的博客
10-25 1839
rnd（）函数，返回的是（0-1）中间的一个浮点数，但有时候我们需要的随机数并不是一个浮点数，比如如何随机生成0-100的整数？         n=rnd()         n=int(s*100)     首先生成随机数，然后浮点数0.XXX扩大100倍则XX.XXX，此时可强制取整。     但是会发现不管执行多少次，随机数一直没变，都是第一次生成的随机数。所以我们要在随机数生
Vbscript 获取随机数
markinlqx的专栏
02-08 2822
'Get Rand Number 'Writer Markin.Q.Li 'Create Date 2013-4-28 'min min 'max max 'Example GetRandNumber(5,10) Public Function GetRandNumber(min, max) Randomize G
Java生成指定范围内不重复随机数的方法
在Java编程中，生成指定范围内的不重复随机数是一个常见的需求，尤其在涉及到游戏开发、安全认证、抽奖系统等场景中。要实现这个功能，我们需要使用Java的基本类库以及一些算法设计的技巧。以下是实现指定范围内不...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值