在窗体中有一个名为Command12的命令按钮,Click事件的代码如下。该事件所完成的功能是:接受从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。请依据上述功能要求将程序补充完整。 Private Sub Command12_C

admin2009-08-15  61

问题  在窗体中有一个名为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

选项

答案num i

解析 题目要求接受从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。空1:本题中先给最大值max变量赋值为0,把每次从键盘输入的数num与最大值max比较,如果num的值大于最大值max的值,最大值max就要被赋予num的值,因此横线处应填入num。空2:变量max_n记录最大值输入的位置,即第几次输入的数,因此横线处应填入i。
转载请注明原文地址:https://kaotiyun.com/show/jEwp777K
0

最新回复(0)