问题 填空题

在窗体中有一个名为Command2的命令按钮,该命令的功能是:接收从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。请依据上述功能要求将事件代码补充完整。
Private Sub Command2_Click()
max=0
max_n=0
For i=1 To 10
num=Val(InputBox("请输入第"&i&"个大干0的整数:"))
If num>max Then
max=______
max_n=i
End If
Next i
MsgBox("最大值为第"&max_n&"个输入的"&max)
End Sub

答案

参考答案:num

解析: 题目要求依次输入第i个大干0的整数num,当num大于定义的max值时,则执行赋值语句max=num,继续依次输入第i个数据,每次都和max值作比较,如果num>max则执行赋值操作max=num。

单项选择题
单项选择题