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

admin2015-05-29 36

问题编写如下程序：
Private Sub Command 1 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<条件1> Then
<语句块l>
[ElseIf<条件2> Then
<语句块2>]
[Else
<语句块n>]
EndIf
如果“条件1”为True，则执行“语句块1”并跳出结构；否则如果“条件2”为True，
则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

把窗体的KeyPreview属性设置为True，然后编写如下事件过程：PrirateSubForm_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(K
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：PrivateSubCommand1Click()Dimx，y，zAsIntegerx=5
有如下程序：PrivateSubFormClick()DimCheck，CounterCheck=TrueCounter=0DoDoWhileCounter＜20
设有程序：OptionBase1PrivateSubCommand1Click()Dimarrl，MaxasIntegerarrl=Array(12，435，76，24，78，54，866，43)
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程．OptionBase0PrivateSubCommand1_ClickDimcityAsVariantcity=Array(“北京”
以下关于菜单的叙述中，错误的是
在长度为n的顺序表的第i(1≤i≤n+1)个位置上插入一个元素，元素的移动次数为【】。
在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是
计时器控件能有规律的以一定时间间隔触发______事件，并执行该事件过程中的程序代码。
在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk

随机试题

组织结构设计的核心是()。
世界上的事物千差万别的原因是()
21世纪人人享有卫生保健的总体目标不包括
《支付结算办法》规定，票据金额以中文大写和阿拉伯数字同时记载，二者不一致的（）。
已知市场组合的期望收益率为15%，无风险收益率为5%。某项金融资产的β值为0.5，则该项金融资产的期望收益率为()。
机动车交通事故责任强制保险与商业三责险的区别是()。
把下面六个图形分为两类，使得每一类图形都有各自的共同特征或规律，分类正确的一项是：
设实二次型f(x1，x2，x3)=(x1一x2+x3)2+(x2+x3)2+(x1+ax3)2，其中a是参数•(I)求f(x1，x2，x3)=0的解；(Ⅱ)求f(x1，x2，x3)的规范形．
If2x=3y=4z=20,then12xyz=
It’ssaidthemostexcitingkindofeducationisalsothemostpersonal.Nothingcan【C1】______thejoyofdiscoveringsomethin

最新回复(0)

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

二级VB

NCRE全国计算机二级

把窗体的KeyPreview属性设置为True，然后编写如下事件过程：PrirateSubForm_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(K

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：PrivateSubCommand1Click()Dimx，y，zAsIntegerx=5

有如下程序：PrivateSubFormClick()DimCheck，CounterCheck=TrueCounter=0DoDoWhileCounter＜20

设有程序：OptionBase1PrivateSubCommand1Click()Dimarrl，MaxasIntegerarrl=Array(12，435，76，24，78，54，866，43)

在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程．OptionBase0PrivateSubCommand1_ClickDimcityAsVariantcity=Array(“北京”

以下关于菜单的叙述中，错误的是

在长度为n的顺序表的第i(1≤i≤n+1)个位置上插入一个元素，元素的移动次数为【】。

在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是

计时器控件能有规律的以一定时间间隔触发______事件，并执行该事件过程中的程序代码。

在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk

组织结构设计的核心是()。

世界上的事物千差万别的原因是()

21世纪人人享有卫生保健的总体目标不包括

《支付结算办法》规定，票据金额以中文大写和阿拉伯数字同时记载，二者不一致的（）。

已知市场组合的期望收益率为15%，无风险收益率为5%。某项金融资产的β值为0.5，则该项金融资产的期望收益率为()。

机动车交通事故责任强制保险与商业三责险的区别是()。

把下面六个图形分为两类，使得每一类图形都有各自的共同特征或规律，分类正确的一项是：

设实二次型f(x1，x2，x3)=(x1一x2+x3)2+(x2+x3)2+(x1+ax3)2，其中a是参数•(I)求f(x1，x2，x3)=0的解；(Ⅱ)求f(x1，x2，x3)的规范形．

If2x=3y=4z=20,then12xyz=

It’ssaidthemostexcitingkindofeducationisalsothemostpersonal.Nothingcan【C1】______thejoyofdiscoveringsomethin