VB在一个区间中抽取vb 产生随机数数

VB怎么样设一个随机数?_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:51,626贴子:
VB怎么样设一个随机数?收藏
快试试吧,可以对自己使用挽尊卡咯~◆◆
设一个a变量。什么语句是可以让a变量的数值是100~200的其中一个随机数?
Randomize
Dim&a
a&=&Int(Rnd&*&101)&+&100
快试试吧,可以对自己使用挽尊卡咯~◆◆
我靠啊有没有颠倒句?怎么还是0?
你没实验过啊?
你这人素质怎么这样?
我给你的代码是没问题的,只是产生随机数再放入a,但具体怎么用是你的事
你可以用&MsgBox&a&或者&Print&a&或者&Text1.Text&=&a&将a显示出来.
我好心帮你,你却说我吹.如果我把未实验过的程序发给你,那是我的错.但是,这个是你自己不会用,居然还怪我!!
9494&尧自己实践&啊。。。要不帮你忙也不安心
快试试吧,可以对自己使用挽尊卡咯~◆◆
fix(rnd*200)
登录百度帐号我的游戏推荐游戏
后查看最近玩过的游戏
为兴趣而生,贴吧更懂你。或如何用VB设计一个产生不带4的随机数_百度知道
如何用VB设计一个产生不带4的随机数
提问者采纳
Private Sub Form_Load()
Picture1.Cls
Picture1.DrawWidth = 1
'DrawWidth返回或设置图形方法输出的线宽。
Picture1.AutoRedraw = True
Picture1.BackColor = QBColor(0)
'QBColor:用来表示所对应颜色值的 RGB 颜色码,参数:1~15
Picture1.Scale (-)-(1500, -1500)
'Scale用以定义 Form、PictureBox 或 Printer 的坐标系统,参数:左上-右下
Picture1.Scale (0, 1500)-(1500, -1500)
'Scale用以定义 Form、PictureBox 或 Printer 的坐标系统,参数:左上-右下
Picture1.Line (-1500, 0)-(1500, 0), QBColor(15)
'画水平线End Sub
其他类似问题
按默认排序
其他4条回答
也可以这样,先取随机数作为最终结果的位数n,然后再产生n遍随机数(在0、1、2、3、5、6、7、8、9中取),然后再随机一个位置放小数点,就OK了,我们也可以用这个思路,呵呵别看题简单,也许还有些更奇妙的思路呢
你用Rnd函数生成随机数,然后加个判断,遇到有4的就重新生成随机数不就得了。
放到通用Private Sub CRandomize()Dim i As IntegerRandomizei = Int(Rnd * 10 + 0) '产生10~0个随机数If i = 4 Then CRandomize Else Label1.Caption = iEnd Sub产生随机数:CRandomizei 就是随机数OK?
问题太小儿科了,都懒的回答了!严重同意1楼观点!
随机数的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁刚刚学习vb,问一些简单的问题...谢谢各位了!!vb中怎样弄A到Z的随机数,随机出现一个,而且不重复?_百度知道
刚刚学习vb,问一些简单的问题...谢谢各位了!!vb中怎样弄A到Z的随机数,随机出现一个,而且不重复?
刚刚学习vb,问一些简单的问题...谢谢各位了!!
Private Sub Command1_Click()Static num(65 To 90), c As IntegerIf c = 26 Then Exit Subc = c + 1Dim s, iRandomizebegin:s = Int(Rnd() * (90 - 65 + 1)) + 65 If num(s) && 1 Theni = Chr(s)num(s) = 1ElseGoTo begin:End IfPEnd Sub
其他类似问题
随机数的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁Vb中Rnd生成一个随机数有什么用啊_百度知道
Vb中Rnd生成一个随机数有什么用啊
提问者采纳
用处很多啊,rnd生成的随机数为0到1的数,通过乘一个数和加一个数就可以变化到一个任意区间的随机数,这样可以用于抽奖之类的,或者用于模拟一些概率事件等等,用处非常广泛。
提问者评价
其他类似问题
按默认排序
其他1条回答
有时候要随机生成什么的时候可以用,比如随机生成一串彩票号码==
rnd的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁VB怎样在一组随机数中求最小值_百度知道
VB怎样在一组随机数中求最小值
我有更好的答案
Dim i As Integer,a(1 To 30) As Integer, min As Integer
For i = 1 To 30
a(i) = Int(1000 * Rnd)
For i = 1 To 30
If a(i) & a(i+1) Then min = a(i)
其他类似问题
随机数的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 c语言中的随机数 的文章

 

随机推荐