从0到9里面随机生成7个数,要不重复的7个数,然后显示出来,VB程序应该怎么写
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/16 15:10:37
从0到9里面随机生成7个数,要不重复的7个数,然后显示出来,VB程序应该怎么写
怎么这么乱啊,就是随机生成7个不重复的数,在0到9这10个数里
怎么这么乱啊,就是随机生成7个不重复的数,在0到9这10个数里
'在窗体上点击
Private Sub Form_Click()
Dim I,J As Integer
Dim a(7),B(7) As Integer
Randomize
a(0) = Int(Rnd() * 10)
For I = 1 To 6
a(I) = Int(Rnd() * 10)
For J = 0 To I - 1
If a(J) = a(I) Then
J = 7
I = I - 1
End If
Next J
Next I
For I = 0 To 6
Print a(I) & " ";
Next I
Print
End Su
Private Sub Form_Click()
Dim I,J As Integer
Dim a(7),B(7) As Integer
Randomize
a(0) = Int(Rnd() * 10)
For I = 1 To 6
a(I) = Int(Rnd() * 10)
For J = 0 To I - 1
If a(J) = a(I) Then
J = 7
I = I - 1
End If
Next J
Next I
For I = 0 To 6
Print a(I) & " ";
Next I
End Su
从0到9里面随机生成7个数,要不重复的7个数,然后显示出来,VB程序应该怎么写
用VB从1-12这12个数中随机生成3个互不重复的数
VB 程序 计算从1到12260之间所有的能同时整除3,7,9的整数的个数
vb语句 设计一个随机数程序,生成10个范围是1到100随机整数,并求出这10个数的最大值,最小值和平均数
从1到11随机抽取五个数(不可重复),然后再从这个5个数中抽取不重复的两个数,概率是多少呢
VB怎么写随机生成10个[1,100]之间的数,并从大到小排列的程序?
编写一个求3个数中最大值和最小值的VB程序,然后用这个过程分别求5个数和7个数的最大最小值.
排列组合算法程序用C.C++.asp.或者jsp.vb.随便一种语言.输出1到33.33个数.从中选6个数.不重复.输出
用VB如何写1到100之间所有能被3整除而不能被7整除的整数的和与个数的程序
怎么用vb随机生成1~10000的10000个数,在按1~1000 1001~2000 2001~3000 9001~1
vb随机数 1000 没次随机出现1个数,1000次内不出现重复的数
随机产生100个数,统计出能被3和7整除的数字,然后从小到大排序打印出来(Java语言)急