首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序: 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
71
问题
设有以下程序:
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全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommandl_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60
执行以下程序段aS=”abbacddcba”Fori=6To2Step一2X=Mid(a,i,i):Y=Lefl(a,i)z=Right(a,i):z=UCase(XYz)Nexti
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.txt”ForInputAs#1:Open”c:\f2.txt”ForOutputAs#
以下关于文件的叙述中,错误的是
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10:TeINumAsString*20EndType在窗体上画一个名为Commandl的命令按钮,要求当执行
下面函数的功能应该是:删除字符串s仃中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ABCDCD”Functiondelchar(strAsString,chAsS
能正确表述“x为大于等于5并且小于20的数”的VisualBasic表达式是
以下能在窗体Form1的标题栏中显示“VisualBasic窗体”的语句是
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
随机试题
焊接局部机械排风技术措施应符合哪些安全要求?
变压器是应用()制作而成的。
A、尿镜检红细胞满视野B、尿镜检白细胞满视野C、尿外观正常,镜检可见各种管型D、尿外观酱油色,隐血试验(+)E、尿外观深黄色,含大量胆红素阵发性睡眠性血红蛋白尿
肺肾阴虚的临床表现有
下列乙肝病毒标志物检查结果中,提示病毒复制活跃的是
下列关于建设项目质量管理的八项原则中“管理的系统方法”的内容表述有误的是()。
《建设工程监理规范》规定,按照施工合同和委托监理合同的约定,当发生( )情况时,总监理工程师可签发工程暂停令。
只有部分人能德才兼备。有的人有“德”但缺乏“才”,而有的人有“才”却没有“德”。前者虽然对社会贡献不大,但对社会没有危害;后者“才”越大对社会危害就越大。由此可见:
Newtechnologylinkstheworldasneverbefore.Ourplanethasshrunk.It’snowa"globalvillage"wherecountriesareonlyseco
Whenthesteamenginewasinventedintheeighteenthcentury,itbeganoneofthegreatestrevolutionsthathaveeverhappenedi
最新回复
(
0
)