2. 计算机
  3. 阅读程序： 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 　　

阅读程序： 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 　　

admin2020-06-30  26
问题 阅读程序：
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://jikaoti.com/ti/1gS0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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