(37)设有以下程序： Private Sub Form＿Click() x=50 For i=l To 4 Y=InputBox(“请输入一个整数”) Y=Val

admin2013-11-29 54

问题 (37)设有以下程序：
Private Sub Form＿Click()
      x=50
      For i=l To 4
         Y=InputBox(“请输入一个整数”)
         Y=Val(Y)
         If Y Mod 5=0 Then
            a=a＋Y
               X＝Y
         Else
               a=a+X
         End If
   Next i
   Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为(    )。

选项 A、100
B、50
C、120
D、70

答案A

解析程序的作用是输入的数如果是5的倍数就累加，如果不是就每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15+15+35+35=100。

转载请注明原文地址:https://kaotiyun.com/show/lPQp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类