首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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-08-28
69
问题
阅读程序:
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/A6Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若有如下程序:PrivateSubCommand1_Click()DimiAsInteger,kAsIntegerk=2Fori=1To3PrintH(k)
若有如下的函数过程:FunctionFunc2(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0i=2
过程共有3种,它们分别是()。
如果文本框的Locked属性设置为True,则下列说法中正确的是()。
只能用来显示文本信息的控件是()。
在窗体上画4个文本框,并用这4个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编者按写如下事件过程:PrivateSubCommand1_Cliek()ForEachTextBoxIn
在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerForj=0To50
某程序列表框中有许多项,现在用Timer控件控制时间,0.1秒删除一项,直到删完为止,用一滚动条来显示删除的项目,请选择合适的语句,完成此程序()。PrivateSubCommand2_Click()HScro111.Min
下列程序的输出图形是()。Fork=0To360cr=Int(160*Rnd)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext
设有以下循环结构:Do循环体LoopWhile<条件>则以下叙述中错误的是______。
随机试题
窗体是Access2010数据库中的一种对象,通过窗体用户不能完成的功能是______________。
Willyoupaycashforthegoods,madam,orwouldyoulikethem______toyouraccount?
心室扑动和心室颤动心电图共同特点是
关于多普勒超声探测的注意事项描述错误的是
根据《商业银行法》的规定,下列哪些表述是不正确的?()
巴塞尔委员会将商业银行面临的风险划分为八大类,其中包括()。
某作家2015年在我国出版一部长篇小说,2月份收到预付稿酬10000元,4月份小说正式出版又取得稿酬20000元,10月份将小说手稿在某国公开拍卖,取得拍卖收入90000元,并按该国有关税法缴纳了个人所得税10000元。该作家在中国境内应缴纳个人所得税(
劳动争议申请仲裁的时效期间为()。
Whenwasthebuildingbuilt?
HappinessandSadnessA)Happinessandsadnessaretwomostbasicandfamiliarfeelingsforhumanbeings.Recently,peoplehavea
最新回复
(
0
)