2. 计算机
  3. 设有以下程序： Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox("请输入一个整数") y=Val(y) If y Mod

设有以下程序： Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox("请输入一个整数") y=Val(y) If y Mod

admin2015-08-13  54
问题 设有以下程序：
  Private Sub Form_Click()
      x=50
      For i=1 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://www.kaotiyun.com/show/3vQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)