题库 高中信息

题干

编写VB程序,实现如下功能:在文本框text1中输入自然数n,单击“产生n个随机数,并求和与最大数计算”按钮Command1,则在列表框List1中输出n个小于100的随机整数,并输出n个随机数的和与最大值,界面如图所示。

(1)观察运行界面,选项中没有用到的控件是 ( 选项
A.B.C.D.)。
(2)设计该窗体界面时,需要将窗体form1的   属性设置为“最大随机数”。
(3)请完善下列程序代码:
Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim s As Integer
Dim max As Integer
n = Val(Text1.Text)
i = 1
Do While i <= n
a(i) =" Int(Rnd" * 100)
List1.AddItem Str(a(i))
s =" s" + a(i)

Loop
max = a(1)
For i =" 2" To n
If a(i) > max Then      
Next i
List1.AddItem "和为:" +
List1.AddItem "最大值为:" + Str(max)
End Sub
空格处应填写的代码为:① ② ③
上一题 下一题 0.99难度 填空题 更新时间:2017-05-26 04:57:49

答案(点此获取答案解析)