VB.编写产生随机整数过程,输出N个指定范围的随机整数.不能用内部函数!不用RND.如果不行,就不要此限制回答吧

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 14:17:26
VB.编写产生随机整数过程,输出N个指定范围的随机整数.不能用内部函数!不用RND.如果不行,就不要此限制回答吧

VB.编写产生随机整数过程,输出N个指定范围的随机整数.不能用内部函数!不用RND.如果不行,就不要此限制回答吧
VB.编写产生随机整数过程,输出N个指定范围的随机整数.
不能用内部函数!
不用RND.
如果不行,就不要此限制回答吧

VB.编写产生随机整数过程,输出N个指定范围的随机整数.不能用内部函数!不用RND.如果不行,就不要此限制回答吧
你所谓的不能用内部函数是指不用rnd这一个,还是所有的都不用啊.
如果是所有的,我看好像无法实现.
再说你这是何苦不用内部函数呢.
说出原因
####################################################################
Private Sub Command1_Click()
Dim intF As Long,intL As Long,intN As Integer,intM As Integer
Dim varTmp As Variant
varTmp = InputBox("请输入随机数的范围,上界和下界用 空格 隔开!" & vbCr & "注意:我将不做正确检查.","输入","1 10")
intN = InputBox("请输入产生随机数的个数","个数",5)
intF = Split(varTmp," ")(0)
intL = Split(varTmp," ")(1)
For intM = 1 To intN
Randomize
Print CInt(Rnd * (intL - intF + 1)) + intF
Next
End Sub

VB.编写产生随机整数过程,输出N个指定范围的随机整数.不能用内部函数!不用RND.如果不行,就不要此限制回答吧 vb用function编写一个产生随机整数过程,输出n个指定范围的随机整数Sub sj(i%,a%,b%)Dim x%x = Int(Rnd * (b - a + 1)) + aEnd SubPrivate Sub Command1_Click()Dim n%,a%,b%,i%,x%n = InputBox(请输入随机整数的个数n)a = InputBo 用VB编写输入数据范围,随机产生3个指定范围内的随机整数,求三个整数平方根之和,保留小数点后4位结果在picture中显示 VB:随机产生 10 个整数,求其中最小的数.若随机产生n个整数又如何实现 VB的:用随机函数产生n个三位整数,用选择法排序后将它们的值从大到小输出,n=204! VB中要求随机产生10个在[10,30]的不同整数怎么编写程序? vb编写一个程序,利用随机函数生成15个80~99之间的随机整数,输出其中的最大值与最小值 VB随机产生10个10到100的整数,每行输出10个代码怎么写?必须是基数 vb编写程序,单击按钮,使计算机产生一个0到100之间的随机整数,然后判断这个数是奇数还是偶数,并输出该 VB利用随机函数产生30个[3,99]整数,打印输出其中的素数(要求用数组存放) Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出 vb 用随机函数产生10个[100,200]之间的随机整数向数组赋值,按降序排列并输出 再求vb高手.利用二分法查询有序数列.编写程序,随机产生15个100以内的整数,使用“二分法查询”方法对数组中的元素值进行查询(提示:只能对有序数进行查询).要求:若指定的数存在,则显 1、编程让计算机自动产生n个随机s三位整数,输出结果,求出最大数和最小数,输出结果.(以下均用java语言2、编写程序用于输出1~100间的整数,并且此整数必须满足:它是3的倍数,但不是5的倍 求计算机高人,要求JAVA的.绘图的题目不用了第一题编程让计算机自动产生n个随机三位整数,输出结果,求出最大数和最小数,输出结果.第二题编写程序用于输出1~100间的整数,并且此整数必须满 要求JAVA编程 绘图的不用写了第一题编程让计算机自动产生n个随机三位整数,输出结果,求出最大数和最小数,输出结果.第二题编写程序用于输出1~100间的整数,并且此整数必须满足:它是3的倍 VB:随机产生30个[100,500]区间的随机整数,求其和及平均值. 用vb做随机产生100个0至9之间的整数,并统计出每个数的个数输出.哪位大哥帮帮忙,急啊.谢谢