在窗体中有一外名为Command2的命令按钮,该命令的功能是:接受从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。请依据上述功能要求将事件代码补充完整。 Private Sub Command2_Click() max=0 max_n=0

admin2010-03-22  17

问题 在窗体中有一外名为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
man=【  】
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。
转载请注明原文地址:https://kaotiyun.com/show/P0wp777K
0

最新回复(0)