用vb 中循环结构显示32个随机数,按照一行7个数字来显示,同时显示数字出现的序号,然后将这组数字中最大和最小的数字显示

来源：学生作业帮编辑：百度作业网作业帮分类：综合作业时间：2024/08/13 14:48:58

用vb 中循环结构
显示32个随机数,按照一行7个数字来显示,同时显示数字出现的序号,然后将这组数字中最大和最小的数字显示他们第一次出现的序号

Private Sub Form_click()
Randomize
Dim a(1 To 32) As Long
Dim Max As Integer,Min As Integer
Dim x As Integer,y As Integer
For i = 1 To 32
a(i) = Int(Rnd * 100)
If a(i) > Max Then Max = a(i):x = i
If i = 1 Then
Min = a(i)
Else
If a(i) < Min Then Min = a(i):y = i
End If
Next
For i = 1 To 32
Print "序号：" & Format(i,"00") & " 数字：" & Format(a(i),"00") & " ";
If i Mod 7 = 0 Then
Print
End If
Next
Print
Print "最大数：" & Max & " 序列："; x
Print "最小数：" & Min & " 序列："; y
End Su

用vb 中循环结构显示32个随机数,按照一行7个数字来显示,同时显示数字出现的序号,然后将这组数字中最大和最小的数字显示编写程序,利用循环语句在同一行中逐个显示从1至n的数字,每个数字之前保留2个空格. 编写一个程序,利用循环语句在同一行中并排显示从1~10的数字,每个数字之间保留3个空格 VB程序设计,输入20个数字,显示其中的奇数个数和偶数个数. vb编程随机生成100个0-99的随机数,并以10*10的样式对齐显示,然后计算每行数字的平均数怎么可以用12864显示数字,这个数字是个变化的数字,有程序吗 excel2010用公式显示某一列出现的第一个数字 proteus仿真数码管 0.5秒显示数字为什么只显示第一个数字其他不显示用循环结构编写程序,实现显示一下数字构成的图案 excel在一个单元格填写数字,另一个表格显示该数字同一行的数据,同时显示填写给数字的日期! Excel中数字怎么不显示小数点后面的0 电子表格中有的数字显示为######是怎么回事