问题
填空题
在窗体中有一个名为command12的命令按钮，click事件的代码如下。该事件所完成的功能是：接受从键盘输入的10个大于0的整数，找出其中的最大值和对应的输入位置。请依据上述功能要求将程序补充完整。
Private Sub Command12_Click()
max=0
max_n=0
For i=1 To 10
Num=Val(InputBox("请输入第"& i &"个大于0的整数："))
If(nunl＞Inax)Then
max= (12)
max_n= (13)
End If
Next i
MsgBox("最大值为第"&max_n &"个输入的" & max)
End Sub
答案
参考答案：(12) num (13) i
解析： 本题考查的是VBA编程基础。题目要求接收从键盘输入的10个大于0的整数，找出其中的最大值和对应的输入位置。本题中先给最大值max变量赋值为0，把每次从键盘输入的数num与最大值max比较，如果num的值大于最大值max的值，最大值max就要被赋予num的值，因此，(12)空处应填入num。变量max_n记录最大值输入的位置，即第几次输入的数，因此，(13)空处应填入i。