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