这段程序什么意思啊.我知道上半部分是在1-30之间产生7个不重复的随机数,下面那部分是将这七个数排序,但从dim j%之
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/03 07:00:35
这段程序什么意思啊.
我知道上半部分是在1-30之间产生7个不重复的随机数,下面那部分是将这七个数排序,但从dim j%之后我不知道什么意思,求教.
Private Sub Command3_Click()
Dim myarray(1 To 7) As Integer
myarray(1) = Int(Rnd() * 30) + 1
Dim i%, n%
For i = 2 To 7
myarray(i) = Int(Rnd() * 30) + 1
For n = 1 To i - 1
Do While myarray(i) = myarray(n)
myarray(i) = Int(Rnd() * 30) + 1
n = 1
Loop
Next n
Next i
For i = 1 To 7
Print myarray(i);
Next i
Print
Dim j%
For i = 1 To 30
For j = 1 To 7
If i = myarray(j) Then
Print i;
End If
Next j
Next i
Print
End Sub
我知道上半部分是在1-30之间产生7个不重复的随机数,下面那部分是将这七个数排序,但从dim j%之后我不知道什么意思,求教.
Private Sub Command3_Click()
Dim myarray(1 To 7) As Integer
myarray(1) = Int(Rnd() * 30) + 1
Dim i%, n%
For i = 2 To 7
myarray(i) = Int(Rnd() * 30) + 1
For n = 1 To i - 1
Do While myarray(i) = myarray(n)
myarray(i) = Int(Rnd() * 30) + 1
n = 1
Loop
Next n
Next i
For i = 1 To 7
Print myarray(i);
Next i
Dim j%
For i = 1 To 30
For j = 1 To 7
If i = myarray(j) Then
Print i;
End If
Next j
Next i
End Sub
Dim j%
For i = 1 To 30
For j = 1 To 7
If i = myarray(j) Then
Print i;
End If
Next j
Next i
Print
这段代码看起来就是把那7个随机数由小到大的打出来
再问: 是的,就是从小到大排列,拜托给我解释下吧。
再答: Dim j% For i = 1 To 30 '这里是一个从1到30的循环,即由小到大 For j = 1 To 7 '这是随机出来的数组值循环,数字大小不定 If i = myarray(j) Then '如果第一个循环中的数字等于随机数组中的数字的话,下面就会打印出来。打个比方,如果这时i=1,然后程序会拿这个1与数组中的所有值循环比较,如果数组中也有一个相应的数,则打印。由于i是从小到大的,估这里打出来的值也只会从小到大 Print i; End If Next j Next i Print
For i = 1 To 30
For j = 1 To 7
If i = myarray(j) Then
Print i;
End If
Next j
Next i
这段代码看起来就是把那7个随机数由小到大的打出来
再问: 是的,就是从小到大排列,拜托给我解释下吧。
再答: Dim j% For i = 1 To 30 '这里是一个从1到30的循环,即由小到大 For j = 1 To 7 '这是随机出来的数组值循环,数字大小不定 If i = myarray(j) Then '如果第一个循环中的数字等于随机数组中的数字的话,下面就会打印出来。打个比方,如果这时i=1,然后程序会拿这个1与数组中的所有值循环比较,如果数组中也有一个相应的数,则打印。由于i是从小到大的,估这里打出来的值也只会从小到大 Print i; End If Next j Next i Print
从1—22中产生5个随机数,不能有重复,我的程序错哪里了?
如何产生1000个从1到1000之间的不重复的随机数,用C语言实现!
火星文,不知道念小还是你,就是上面是台字的上半部分,下面是个小字.
上面是馨的上半部分面,下面是个耳读什么字?是个繁体字,打不出来.
VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正
随机产生1-33之间的6个随机数(保证6个数字不重复)按照从大到小的顺序排列
卷的上半部分,下面是个“言”,怎么读?
c语言要随机置出1到1000的随机数10组一组7个一组中数字不得重复从中选出出现次数的七个,在输出这七个数
程序 填空题下列程序的功能是:随机产生10个1——100(包含1不包含100)之间的正整数,按从大到小的次序排序并输出.
dim j%什么意思
一个罄上半部分下面一个香什么意思
excel随机数生成怎样在A2:A577中产生10000---9999999之间的随机数?而且要不重复.我用的是2003