首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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
admin
2015-10-23
59
问题
阅读程序:
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://kaotiyun.com/show/qJLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。OptionBase1PrivateSubForm_Cfick()DimX
为同一种对象设置不同的属性,可以使一种对象具有不同的外观和不同的______。
运行以下程序后,输出的图形是()。Forr=OTo150Circle(320,240),rFori=1To1000NextiNextr
下列程序运行时输出的结果是()。PrivateSubForm_Click()Dimaa=Array("天天向上","清华大学","天上人间","程序设计")forI=Lbound(a,1)toUb
假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为()。
如果将PassWordChar属性设置为一个字符,如星号(*),运行时,在文本框中输入的字符仍然显示出来,而不显示星号,原因可能是()。
设有关系R和S,关系代数表达式为R-(R-S)表示的是
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_KeyPress(K
在程序中动态地给图片框加载图像文件的函数为______。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于______的联系。
随机试题
归档文件整理应保持文件之间的有机联系,使之便于()
下列哪些腹外疝应行紧急手术治疗()
P波与QRS波无固定关系,可见室性自主心律的心电图表现是P-R间期固定,QRS波有脱漏的心电图表现是
适合随访观察的子宫肌瘤是
乳牙最晚于何时出齐
建设项目管理与企业管理同属于管理活动的范畴,但从建设项目管理的内涵可以看出,两者有着明显的区别,其区别包括( )几个方面。
若每隔一米远栽一棵树,问在123米的道路上共栽多少棵树?()
汇率变动的间接经济影响有()。
亦步亦趋:主见
拟态环境(华南理工2011研)
最新回复
(
0
)