编写如下程序： Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 Else Ifscore>60

admin2020-04-18 38

问题编写如下程序：
Private Sub Command1_Click()
Dim score As Integer
score=86
If score>85
Then r=1
Else Ifscore>60 Then
r=2
Else
r=0
End If
Print r
End Sub
程序运行后，单击命令按钮Command1，输出结果为

选项 A、0
B、1
C、2
D、86

答案B

解析块结构条件语句的格式为：
lf<条件l>Then  ：  <语句块l>
[ElseIf<条件2>Then  ：<语句块2>]
…
[Else  ：  <语句块n>]
End If
如果“条件1”为True，则执行“语句块1”并跳出结构：否则如果“条件2”为True，则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。

转载请注明原文地址:https://jikaoti.com/ti/L4x0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

关于随机文件，以下叙述中错误的是()。
以下合法的VB变量名是()。
窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件
下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是
如图所示，在窗体上有一个文本框控件，名称为TextTime：一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime．Text＝TimeEndSub
设置定时器控件的Interval属性为2000，Enabled属性为True，并且有下面的事件过程，程序运行时计算机将发出()次Beep声。SubTimer1Timer()BeepEndSub
数据结构主要研究的是数据的逻辑结构、数据的运算和()。
设树T的深度为4，其中度为1，2,3,4的结点个数分别为4,2，1，1。则T中的叶子结点数为
某二叉树中有15个度为1的结点，16个度为2的结点，则该二叉树中总的结点数为
在下列模式中，能够给出数据库物理存储结构与物理存取方法的是(　　)。

随机试题

简述国家富强、民族振兴、人民幸福三者之间的关系。
男，56岁。吞咽困难5个月。胃镜检查见食管中断隆起伴溃疡，管腔狭窄，管壁僵硬，管壁僵硬。黏膜活检最可能的病理改变是
当获证企业发生质量管理体系存在严重不符合规定时，认证机构作出的处理决定是()。
定期清查，可以是全面清查，也可以是局部清查。()
小罗是国内重点大学计算机专业毕业的研究生。找工作过程中他发现，与几年前报考研究生时相比，由于整体经济下滑、计算机专业学生过剩，工作不如当年好找，工资水平也达不到当年的预期。由于小罗学习成绩优异，在校期间曾开发的一套校园交友软件还被某公司收购，所以
(2013年)已知极限其中k，c为常数，且c≠0．则
设仅包含根结点的二叉树的高度为0，则高度为k的二叉树的最大结点数为
有三个关系R、S和T如下：则由关系R和S得到关系T的操作是（）。
InterestsandStudyActivitiesAnarrowingofyourworkinterestsisimpliedinalmostanytransitionfromastudyenvironm
Forthispart,youareallowed30minutestowriteashortessay.Youshouldstartyouressaywithabriefdescriptionofthepi

最新回复(0)

编写如下程序： Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 Else Ifscore>60

二级VB

NCRE全国计算机二级

关于随机文件，以下叙述中错误的是()。

以下合法的VB变量名是()。

窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件

下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是

如图所示，在窗体上有一个文本框控件，名称为TextTime：一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime．Text＝TimeEndSub

设置定时器控件的Interval属性为2000，Enabled属性为True，并且有下面的事件过程，程序运行时计算机将发出()次Beep声。SubTimer1Timer()BeepEndSub

数据结构主要研究的是数据的逻辑结构、数据的运算和()。

设树T的深度为4，其中度为1，2,3,4的结点个数分别为4,2，1，1。则T中的叶子结点数为

某二叉树中有15个度为1的结点，16个度为2的结点，则该二叉树中总的结点数为

在下列模式中，能够给出数据库物理存储结构与物理存取方法的是( )。

简述国家富强、民族振兴、人民幸福三者之间的关系。

男，56岁。吞咽困难5个月。胃镜检查见食管中断隆起伴溃疡，管腔狭窄，管壁僵硬，管壁僵硬。黏膜活检最可能的病理改变是

当获证企业发生质量管理体系存在严重不符合规定时，认证机构作出的处理决定是()。

定期清查，可以是全面清查，也可以是局部清查。()

(2013年)已知极限其中k，c为常数，且c≠0．则

设仅包含根结点的二叉树的高度为0，则高度为k的二叉树的最大结点数为

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是（）。

InterestsandStudyActivitiesAnarrowingofyourworkinterestsisimpliedinalmostanytransitionfromastudyenvironm

Forthispart,youareallowed30minutestowriteashortessay.Youshouldstartyouressaywithabriefdescriptionofthepi

在下列模式中，能够给出数据库物理存储结构与物理存取方法的是(　　)。