首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序: 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 N
设有以下程序: 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 N
admin
2020-04-18
65
问题
设有以下程序:
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/7aTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定一个工程由一个窗体文件Forml和两个标准模块文件Modell和Model2组成Modell的代码如下:PublicxAsInteger:PublicYAsIntegerSubS10x=1S2EndSubMo
有如下过程代码:Subvar_dim()StaticnumaAsIntegerDimnumbAsIntegernuma=numa+2:numb=numb+1:printnuma;numbEn
语句PrintFormatS(23846.5,”000,000.00”)的输出结果是
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.txt”ForInputAs#1:Open”c:\f2.txt”ForOutputAs#
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”Text1”
InputBox函数返回值的类型为()。
下列循环中,可以正常结束的是( )。
下列列说法中,错误的是()。
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为()。
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为()。
随机试题
What’sthedoctors’opinionabouthobbies?Hobbieshelptomakeourlives________________________________
在Excel2010中,向一个单元格输入公式或函数时,使用的前导字符必须是()
Access2010的表中,通常______________不可以定义为主键。
最常引起卵巢Krukenberg瘤的为
最严重的输血反应是一般于输血10~15ml后出现的反应是
关于基因诊断、治疗的伦理原则下列各项中除外
施工作业技术交底的内容必须具有()。
下列各项中,关于“资产”的表述不正确的是()。
因签订集体合同发生争议,其处理程序为由劳动争议仲裁机构仲裁。()
明代擅长“易圆以方,易整以散”装饰手法的画家是()。
最新回复
(
0
)