首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private SUb Command1_Click( ) x=0 do Until x=-1 a=InputBox("请输入a的值") a=Val(a) b=
在窗体上画一个命令按钮,然后编写如下事件过程: Private SUb Command1_Click( ) x=0 do Until x=-1 a=InputBox("请输入a的值") a=Val(a) b=
admin
2018-09-29
28
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private SUb Command1_Click( )
x=0
do Until x=-1
a=InputBox("请输入a的值")
a=Val(a)
b=InputBox("请输入b的值")
b=Val(b)
x=InputBox("请输入X的值")
x=Val(x)
a=a+b+x
Loop
Print a
End Sub
程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1则输出结果是( )。
选项
A、2
B、3
C、14
D、15
答案
A
解析
本题输出变量a的值,在每次循环时,都对变量a、b、x进行了赋初值,因此只要考虑最后一次循环即可。也就是当输入a=2,b=1,x=-1时的表达式“a=a+b+x”的值,也就是最后a的值为2,所以选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/EQFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“单
以下表达式与Int(3.5)的值相同的是
如果将命令按钮的访问键设置为"D",以下不会触发命令按钮Click事件的操作是
VisualBasic源程序的续行符为
编写如下程序:PrivateSubCommand1_Click()DimnumAsIntegerDimkAsInteger,nAsIntegernum=InputBox("请输入一个正整数:")k
下面关于标准模块的叙述中错误的是( )。
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是( )。
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
(1)在名称为Form1、标题为“标签”的窗体上添加一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的标题为“计算机等级考试”;②标签可根据标题内容自动调整其大小;③标签带有边框,且标签标题显示为三号字。程序运行后
随机试题
项背强直,肢体酸重,筋脉拘急,胸脘痞闷,身热,渴不欲饮,溲短赤,苔黄腻,脉滑数,选用
Didyoueverhavesomeone’snameonthetipofyourtongueandyetyouwereunabletorecallit?【C1】______thishappensagain,do
患者久患胁痛,痛势隐隐。绵绵不休,口干咽燥。心烦少寐。头晕目眩,舌红少苔,脉弦细。其治法是
A.100级B.1000级C.10000级D.100000级E.300000级依照《药品生产质量管理规范》附录最终灭菌的无菌药品,其直接接触药品的包装材料最终处理生产环境的空气洁净要求
在进行投资项目方案经济比选时,对于仅有费用流量且计算期相同的互斥方案,以()的方案为最优方案。
在Excel中,设A1单元的内容是数值15,A2单元的内容是数值12,在A3单元中输入函数:IF(A1=10,A2,0)后,A3单元的结果是( )。
在国民收入分配分析指标中,消费率是最终消费支出与( )之比。
我国企业的现金流量表属于年度报表,由报表正表和补充资料两部分组成。下列各项不属于现金流量表补充资料内容的是()。
区分不同税种的主要标志是( )。
关于等价分类测试法,下列说法不正确的是______。A)使用等价分类法设计测试方案时首先需要划分输入数据的等价类B)等价类是指某个输入域的子集和,在该子集合中各个输入数据对于揭露程序中的错误都是等效的C)测试某个等价类的代表值就等价于对这一类其
最新回复
(
0
)