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

admin2020-07-22 41

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

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

答案B

解析考察If…Else If…Else…End If语句。条件判断成立则执行对应分支的语句。86>85，所以r=1。选B）。

转载请注明原文地址:https://kaotiyun.com/show/3fHp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：PrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger)　　DimcAsString　　
数据库的数据模型分为()。
命令按钮Command1的MouseUp事件过程结构如下：PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
有三个关系R．S和T如下：则由关系R和s得到关系T的操作是()。
在考生文件夹下有一个工程文件sjt5．vbp，已给出了所有控件(如图3．62所示)和部分程序。程序运行时，请按以下顺序操作：1)单击“读入文件”按钮，把考生目录下的文件in5．dat中的内容读入内存并显示在上面的文本框(Text1)中；2)单击“加密”
窗体上有1个名称为Label1的标签；1个名称为List1，且含有若干表项的列表框。为了使得单击List1中某个表项时，在Label1中相应地显示该表项，应使用的程序代码为
窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer()　　StaticflagA
下列叙述中，不属于软件需求规格说明书的作用的是()。
面向对象方法中，继承是指(　　)。
在深度为7的满二叉树中，叶子结点的个数为

随机试题

无牙颌修复前做齿槽骨修整术的主要目的是
监理工程师享有的权利包括(　　)。
在客观公正性原则中，资产评估的依据是()。
下列不属于现金资产的有()。
西汉末年至东汉初年，以大司马、大司徒、大司空为三公，其中大司马主要掌管的是()。
陈述性知识主要以概念、产生式的形式表征。()
下列关于Windows2003系统DNS服务器的描述中，正确的是______。A)DNS服务器的IP地址应该由DHCP服务器分配B)DNS服务器中根DNS服务器需管理员手工配置C)主机记录的生存时间指该记录在服务器中的保存时间D)转发器是
能够减少相同数据重复存储的是
AmongthefirsttocomeandliveinNorthAmerica______,wholaterprosperedmainlyinNewEngland.
Howmanyyearsoffinancialstatusshouldthemanoffer?

最新回复(0)

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

二级VB

NCRE全国计算机二级

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：PrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger) DimcAsString

数据库的数据模型分为()。

命令按钮Command1的MouseUp事件过程结构如下：PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,

有三个关系R．S和T如下：则由关系R和s得到关系T的操作是()。

窗体上有1个名称为Label1的标签；1个名称为List1，且含有若干表项的列表框。为了使得单击List1中某个表项时，在Label1中相应地显示该表项，应使用的程序代码为

窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer() StaticflagA

下列叙述中，不属于软件需求规格说明书的作用的是()。

面向对象方法中，继承是指( )。

在深度为7的满二叉树中，叶子结点的个数为

无牙颌修复前做齿槽骨修整术的主要目的是

监理工程师享有的权利包括( )。

在客观公正性原则中，资产评估的依据是()。

下列不属于现金资产的有()。

西汉末年至东汉初年，以大司马、大司徒、大司空为三公，其中大司马主要掌管的是()。

陈述性知识主要以概念、产生式的形式表征。()

下列关于Windows2003系统DNS服务器的描述中，正确的是______。A)DNS服务器的IP地址应该由DHCP服务器分配B)DNS服务器中根DNS服务器需管理员手工配置C)主机记录的生存时间指该记录在服务器中的保存时间D)转发器是

能够减少相同数据重复存储的是

AmongthefirsttocomeandliveinNorthAmerica______,wholaterprosperedmainlyinNewEngland.

Howmanyyearsoffinancialstatusshouldthemanoffer?

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：PrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger)　　DimcAsString　　

窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer()　　StaticflagA

面向对象方法中，继承是指(　　)。

监理工程师享有的权利包括(　　)。