首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序: 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
admin
2015-08-13
33
问题
设有以下程序:
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/3vQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假设X的值是5,则执行以下语句时,可得到的输出结果是ABCDEF的SelectCase语句是()
表达式Right("Beijing",4)的值是()
在C:\Pic文件夹中有一个图形文件,名为Welcome.gif。为了将该图形装入窗体Form1,应使用的语句为()
在窗体上画一个命令按钮(名称为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()StaticaAsIntegera=a+1EndSub运行程序
在菜单编辑器中建立一个菜单,其主菜单项的名称为nmuEdit,Visible属性为False。程序运行后,如果用鼠标右键单击窗体,则弹出与mnvEdit对应的菜单。以下是实现上述功能的程序,请填空。PrivateSubForm【】(But
设在工程中有一个标准模块,其中定义了如下记录类型______。TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Comman
在下列几种排序方法中,要求内存量最大的是______。
(1)在窗体Forml上画一个名称为Textl的文本框和一个名称为Labell的标签,程序运行时,在文本框Textl中输入字符,文本框中的字符将值赋到Labell中。注意,本程序代码中不得使用任何变量。程序运行时的窗体界面如图50—l所示。注意:
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Labell和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Textl和Text2、初始值
随机试题
腰下三角
糖酵解的脱氢反应步骤是
患儿,女,7个月。早产,人工喂养,未及时添加辅食。1个月来间断惊厥3次,发作时不发热,每次持续2~3分钟,发作时意识丧失,惊厥停止后意识恢复。应首先考虑的是
虚拟建设这个概念从本质上来说,其包括的管理理念是()。
细水雾灭火系统由加压供水设备、系统管网、分区控制阀组、细水雾喷头和火灾自动报警及联动控制系统等组成,按照驱动源类型可以分为()。
公允价值模式下,换出资产为可供出售金融资产的,换出资产公允价值和换出资产账面价值的差额,计入投资收益,同时将持有期间因公允价值变动形成的资本公积转入投资收益。()。
联合国气候变化大会于2009年12月7日在丹麦首都哥本哈根开幕,190多个国家和地区的代表参加这次为期12天的会议,100多位国家、地区和国际组织的领导人将与会,此次会议将成为全球应对气候变化的重要一步。当前,世界各国普遍重视气候变化问题,认识到各国在此问
某企业现有一张期限为8个月的应收票据,票面值为60万元,年息为6%,截至评估基准日还有两个半月的时间到期,设贴现息为8%。求应收票据的评估值。
A.条件(1)充分,但条件(2)不充分。B.条件(2)充分,但条件(1)不充分。C.条件(1)和(2)单独都不充分,但条件(1)和条件(2)联合起来充分。D.条件(1)充分,条件(2)也充分。E.条件(1)和(2)单独都不充分,条件(1)和条件(2
ThecuisineofMexicocanbedatedbackto700B.C.,whentheareawaspopulatedbyIndianswhosestaplefoodwascorn.Inthec
最新回复
(
0
)