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

  • 1、
【正确答案】 1、num i    
【答案解析】[解析] 本题考查选择和循环的知识。求最大值的程序比较简单,只要先设置一个代表最大值的变量,其初值为足够小;然后开始依次检查输入的数据,如果输入的数据比当前的最大值大,则代表新输入的数据应该作为新的最大值;这样循环结束后可以保证最大值变量里面放的是所有数据中的最大值。所以,在第一个空白处应该填入num。每次循环的i值刚好是输入数据的次序值,当输入的数据比当前的最大值大时,当前的i值就是新的最大值的位置。所以在第二个空白处应该填入i。