vb 从20到90中产生3行20列数字,每一行都从小到大排列.
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/07/22 06:56:15
vb 从20到90中产生3行20列数字,每一行都从小到大排列.
![vb 从20到90中产生3行20列数字,每一行都从小到大排列.](/uploads/image/z/2073661-61-1.jpg?t=vb+%E4%BB%8E20%E5%88%B090%E4%B8%AD%E4%BA%A7%E7%94%9F3%E8%A1%8C20%E5%88%97%E6%95%B0%E5%AD%97%2C%E6%AF%8F%E4%B8%80%E8%A1%8C%E9%83%BD%E4%BB%8E%E5%B0%8F%E5%88%B0%E5%A4%A7%E6%8E%92%E5%88%97.)
Private Sub Form_Click()
Dim a(1 To 60) As Integer
Dim t%
Randomize
For i = 1 To 60
a(i) = Int(Rnd * 79) + 20
Next i
For i = 1 To 59
For j = 1 To 60 - i
If a(j) > a(j + 1) Then
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
End If
Next j
Next i
For i = 1 To 60
Print a(i);
If i Mod 10 = 0 Then
Print
End If
Next i
End Su
Dim a(1 To 60) As Integer
Dim t%
Randomize
For i = 1 To 60
a(i) = Int(Rnd * 79) + 20
Next i
For i = 1 To 59
For j = 1 To 60 - i
If a(j) > a(j + 1) Then
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
End If
Next j
Next i
For i = 1 To 60
Print a(i);
If i Mod 10 = 0 Then
End If
Next i
End Su
vb 从20到90中产生3行20列数字,每一行都从小到大排列.
用什么软件可以从1-20这些数字中选择4个数字,以从小到大的排列方式,全部列出来.
EXCEL中A列是数字其中有重复的,B列是从小到大排列1,2,3,4,5,6.要求C列中显示B列中数字在A列中出现的次数
Excel,在表格中如何把两列数字 从小到大排列
C语言程序设计 定义一个二维数组a[3][4],要求输入12个数每一行从小到大排列,每一列从小到大排列
第一列是数字,每个数字对应第二列3行文字,怎么用宏或公式排列这两列,排序规则是按第一列数字从小到大
c语言程序设计:从1-6这6个数字中取出3个,设每个组合的3个数字从小到大排列输出,求出所有的可能组合
如何通过vb 产生1-33的随机数和1-16的随机数,在1个文本中显示出来,并且从小到大排列,求代码~
从 1、2、3、4这四个数字中取一个,或两个,或三个,或四个组成的自然数共有______个,将它们从小到大排列
VB怎样把数字按从大到小排列?
数学排列组合1到30中先任意提取7个数字,然后这7个数字从小到大排列有几种排列方式?
EXCEL中,识别二个数字从小到大排列.求公式.