求 按键精灵输入数字变量 随机输入5个不同的数字

来源：蜘蛛抓取(WebSpider) 时间：2017-09-14 07:05 标签： 按键精灵输入连续数字
请教，按概率产生两个随机数该怎么写。 _ 综合讨论 - 按键精灵论坛
腾讯微博：
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.6软件大小：62.5M更新时间：09-27
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 501|回复: 16
请教一个问题，Randomizex = int(Rnd*2+1)这个代码是随机产生1和2的，是按50%概率产生的吧。我想让1的概率是51%，2的概率是49%，该怎么写呢。感谢。
剑侠勋章剑侠世界公测活动勋章过大年勋章俩小福娃给大家拜年啦！猴年勋章猴年专属“大圣”勋章双十一绝版纪念勋章双十一绝版纪念勋章抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）按键精灵开发者6级（新浪V认证）通过新浪微博加V后自动发放，并替换普通的认证6级勋章。 微博达人（90天）完成新浪微博加V的奖励，结合活动不定期开放申请。幸运草勋章（永久）商业小精灵限时活动勋章。马年勋章（360天） 马年纪念勋章（360天）年全勤论坛连续打卡签到365次以上（365天）月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励按键图书勋章尊贵的按键图书用户天使勋章天使一样的用户潜水员按键潜水员勋章按键明星按键明星勋章黄金之翼黄金之翼勋章活动狂人论坛活动狂人骨灰级按键用户3年以上的按键论坛用户龙年勋章（360天）龙年纪念勋章（360天）十周年勋章（360天）十周年纪念勋章兔年勋章（360天）兔年纪念勋章(360天)论坛GG按键论坛男性用户勋章小红帽对论坛提出良好建议（可向管理员申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
随机100个数字，随机到的数字大于51则..反之..就说这么多了。
承接各类游戏脚本及电脑操作开发 有偿解决任何按键基础问题（可远程讲解、教会为止）QQ： 《征途2S》和《千军》全部功能完全免费的脚本 ↓
x = int(Rnd*10000+1)
//TracePrint x
If x &= 1 and x &= 5068 Then
End If我有试过10000个数字拿来分，可不是想要的效果。就要两个数字按概率出可以吗。
抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）黄瓜勋章（永久）体验商业小精灵活动的奖励按键精灵开发者6级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送小红帽对论坛提出良好建议（可向管理员申请）
rs = Int(100*Rnd + 1)
If rs &= 51 Then '1 的概率为51%
&&&&TracePrint 1
ElseIf rs & 51 Then '2 的概率为49%
&&&&TracePrint 2
游戏、办公、网页、脚本辅助定制联系QQ: 淘宝店铺：
回复 这是100范围内分出来的，其实我意思是就1和2两个数范围内按51和49的比例产生随机数。有办法吗。谢谢。
按键精灵开发者6级可通过提升认证等级来升级勋章：
回复 四楼的就是51%出1..49%出2啊..
抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）黄瓜勋章（永久）体验商业小精灵活动的奖励按键精灵开发者6级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送小红帽对论坛提出良好建议（可向管理员申请）
TracePrint 概率随机(&1=51%,2=49%&)
Function 概率随机(参数)
&&&&Dim 分割参数, X, Y, I, 概率, rs, j
&&&&Y = 100
&&&&分割参数 = Split(参数, &,&)
&&&&If UBound(分割参数) & 0 Then
&&&&&&&&Redim TEMP_POR(UBound(分割参数))
&&&&&&&&Redim TEMP_V(UBound(分割参数))
&&&&&&&&For i = 0 To UBound(分割参数)
&&&&&&&&&&&&分割数据 = Split(分割参数(i), &=&)
&&&&&&&&&&&&If UBound(分割数据) & 0&&&& Then
&&&&&&&&&&&&&&&&TEMP_V(i) = 分割数据(0)
&&&&&&&&&&&&&&&&概率 = CLng(Replace(分割数据(1), &%&, &&))
&&&&&&&&&&&&&&&&If i = 0 Then
&&&&&&&&&&&&&&&&&&&&X = X +&&&& 概率
&&&&&&&&&&&&&&&&&&&&TEMP_POR(i) = X
&&&&&&&&&&&&&&&&&&&&Y = Y - 概率
&&&&&&&&&&&&&&&&Else
&&&&&&&&&&&&&&&&&&&&X = Round(X + Y * 概率 * 0.01, 0)
&&&&&&&&&&&&&&&&&&&&TEMP_POR(i) = X
&&&&&&&&&&&&&&&&&&&&Y = Y - Round(Y * 概率 * 0.01, 0)
&&&&&&&&&&&&&&&&End If
&&&&&&&&&&&&Else
&&&&&&&&&&&&&&&&TracePrint &出错，数据设置错误！&
&&&&&&&&&&&&&&&&Exit Function
&&&&&&&&&&&&End If
&&&&&&&&Next
&&&&&&&&Randomize
&&&&&&&&rs = Int(100 * Rnd + 1)
&&&&&&&&For j = 0 To UBound(TEMP_POR)
&&&&&&&&&&&&If j = 0 Then
&&&&&&&&&&&&&&&&If 0 & rs And rs &= TEMP_POR(j) Then
&&&&&&&&&&&&&&&&&&&&概率随机 = TEMP_V(j)
&&&&&&&&&&&&&&&&&&&&Exit Function
&&&&&&&&&&&&&&&&End If
&&&&&&&&&&&&ElseIf j = UBound(TEMP_POR) Then
&&&&&&&&&&&&&&&&If TEMP_POR(j) & rs And rs &= 100 Then
&&&&&&&&&&&&&&&&&&&&概率随机 = TEMP_V(j)
&&&&&&&&&&&&&&&&&&&&Exit Function
&&&&&&&&&&&&&&&&End If
&&&&&&&&&&&&Else
&&&&&&&&&&&&&&&&If TEMP_POR(j-1) & rs And rs &= TEMP_POR(j) Then
&&&&&&&&&&&&&&&&&&&&概率随机 = TEMP_V(j)
&&&&&&&&&&&&&&&&&&&&Exit Function
&&&&&&&&&&&&&&&&End If
&&&&&&&&&&&&End If
&&&&&&&&Next
&&&&&&&&If 概率随机 = && Then
概率随机 = TEMP_V(0)
&&&&&&&&TracePrint &出错，概率选择不能低于2个！&
&&&&&&&&Exit Function
&&&&End If
End Function
神梦科技 最后编辑于
游戏、办公、网页、脚本辅助定制联系QQ: 淘宝店铺：
火山发电厂
按键精灵开发者4级可通过提升认证等级来升级勋章：
RandomizeFor 200000
If rnd & 0.49 Then
a2 = a2 + 1
a1 = a1 + 1
End IfNextMessageBox FormatNumber(a1 / 20000, - 1 , - 1 )//要算很久, 等结果
小红帽对论坛提出良好建议（可向管理员申请）
回复 四楼的就是51%出1..49%出2啊.. qq 发表于
20:21:08 没注释新人看不来
抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）黄瓜勋章（永久）体验商业小精灵活动的奖励按键精灵开发者6级可通过提升认证等级来升级勋章：按键会员（月）按键会员绑定账号后自动赠送小红帽对论坛提出良好建议（可向管理员申请）
回复 TracePrint 概率随机(&1=51%,2=49%&)
复制代码返回1的概率是51%，返回2的概率是49%这么明显的例子，你也看不懂，我也无语了！
游戏、办公、网页、脚本辅助定制联系QQ: 淘宝店铺：
按键精灵开发者4级可通过提升认证等级来升级勋章：学有所成学有所成勋章，新手步入按键学堂的第一枚勋章图灵勋章参与按键精灵验证码识别大赛奖励鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励幸运草勋章（永久）商业小精灵限时活动勋章。
rnd本身就是个0-1的数字if rnd&=0.51 thenelseend if
最后编辑于按键精灵脚本之输出一个几位的随机数字_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
按键精灵脚本之输出一个几位的随机数字
&&按键精灵
阅读已结束，下载文档到电脑
想免费下载更多文档？
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 按键精灵输入连续数字 的文章

 

随机推荐