首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序: Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox(”请输入一个整数”) y
设有以下程序: Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox(”请输入一个整数”) y
admin
2013-10-16
30
问题
设有以下程序:
Private Sub Form_Click()
x=50
For i=1 To 4
y=InputBox(”请输入一个整数”)
y=Val(y)
Ify 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
解析
本题考查的考点是有关循环的。本题需要写出每一次循环的变量变化情况。第一次循环时输入15,If判断为真,所以a=15,x=15;第二次循环时输入24,If判断为假,所以a=15+15=30,x仍然为15;第三次循环时输入35,If判断为真,所以a=30+35=65,x=35;第四次循环时输入46,If判断为假,所以a=65+35=100,x=35。
转载请注明原文地址:https://kaotiyun.com/show/gLQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行如下语句:Print"计算机等级考试";Print"(二级)",Print"VisualBasic"运行后输出结果是______。
编写如下代码:DimFlagAsBooleanPrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Flag=T
以下语句的输出结果是______。a=123b=456Printa;b
以下语句的输出结果是______。PrintFormat(12345.6,"000,000.00")
在启动窗体Form1上画一个名为Command1的命令按钮和两个文本框(其名称分别为Text1和Text2),新建一个窗体Form2。然后编写如下程序:PrivateSubCommand1_Click()msg$="Ret
在名为Form1的窗体上建立一个二级下拉菜单(菜单项见下表)。注意:文件必须存放在考生文件夹中,工程文件名为CXeCise95.vbp,窗体文件名为execiSe95.frm。
在名为Form1的窗体上建立一个名为Pic1的图片框,两个名称分别为Cmd1和Cmd2的命令按钮,标题分别为Print和Clear,如下图所示。编写适当的事件过程,要求程序运行后,每单击一次Print按钮,不使用任何变量,直接在图片框中显示“计算机等级考试
以下关于菜单的叙述中,错误的是______。
以下关于过程及过程参数的描述中,错误的是______。
以下不能在“工程资源管理器”窗口中列出的文件类型是
随机试题
是以太山不让土壤。
在一定温度下牛顿流体的切变速度与切变应力之间呈线性关系。()
下列各项中,符合消费税法有关规定准予从销售额中扣除外购已税消费品已纳消费税的是( )
如果使用审计抽样实施控制测试没有为得出有关测试总体的结论提供合理的基础,下列有关注册会计师采取的措施中,错误的是()。
甲企业销售乙餐厅的礼品券,持礼品券的客户可在指定餐厅用餐。礼品券向客户提供了显著低于餐饮正常售价的重大折扣(客户支付100元购买礼品券,持礼品券能在餐厅享用售价为200元的餐饮)。甲企业在客户有需求时才购买礼品券。礼品券通过甲企业的网站销售,并且礼品券不可
随着几声嘹亮的鸡叫,整个湖山醒来了。披着晨雾,踏着朝霞,采茶姑娘三五成群,结伴向茶园走去。空中弥漫着淡淡的花香,__________的茶树丛中,不时传来银铃般的欢笑声。填入划横线部分最恰当的一项是()。
美国授予发明者的专利数量,由1971年的56000项下降到1978年的45000项。美国在研究和开发方面的投入在1964年到达其顶峰——占GNP的3%,而在1978年只是2.2%,在这期间,研究和开发费用占GNP的比重一直在下降。同一时期,西德和日本却
美国导演迈克尔·穆尔自他的最新纪录片《资本主义:一个爱情故事》问世以来,一直颇受关注。“资本主义”为何与“爱情故事”联系起来呢?穆尔解释说,这是一种“贪欲之爱”,喜爱财富的人不仅爱他们自己的钱,也爱你口袋中的钱……很多人不敢说出它的名字,真见鬼,就说出来吧
设函数z=f(x,y)的全微分为dz=xdx+ydy,则点(0,0)()
Thinkbeforeyoupost.Youmightnotbeawareofhowmuchinformationyou’re【C1】______.That’sthemessagefromthefounders
最新回复
(
0
)