编写如下程序： Pfivate Sub Commandl Click() Dim score As Integer score=86 Ifscore>85 Then r=1 ElseIfscore＞60 Then r=2 Else r=0 End If P

admin2020-04-18 26

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

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

答案B

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

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivateXAsIntegerPrivateSubCommand1_Click()　　X＝5：Y＝3　　
以下关于过程及过程参数的描述中，错误的是(　　)。
设有如下Command1的单击事件过程及fun过程：PrivateSubCommand1_Click()　　DimxAsInteger　　x＝Val(InputBox("请输入一个整数"))　　fun(x)EndSubPrivate
窗体上有1个名称为Text1的文本框，1个名称为Timer1的计时器，且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是，单击窗体，则每隔2秒钟在Text1中显示一次当前时间。Priva
以下()控件没有Caption属性。
下列关于窗体的描述中，错误的是()。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是(　　)。
下面属于系统软件的是
为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(　　)。
以下叙述中正确的是()。

随机试题

对下列成语解释得不恰当的是()。
所谓“寒从中生”病机，主要是指
李永宏于2003年离家出去打工后就没有任何消息，下列做法合乎法律规定的是()。
会计监督应贯穿于经济业务发生的全过程。()
下列关于期货交易保证金的说法中，正确的有()
下列关于押品种类的说法正确的是()。
下列选项中，属于动作技能的是()
一个校园网主干网有4台Catelyst6500核心交换机SW1-SW4，它们的优先级值依次为8192、24576、20480和16384，要将SW4作为根交换机，SW4优先级的正确配置是()。
1.Discussion--about5minutesInthispartofthetestyouaregivenadiscussiontopic.Youhave30secondstolookatthepro
InAmericanIndianart,thesupposeddistinctionbetweenmodernandtraditionalwasfabricatedbycritics,andwhenartistshave

最新回复(0)

编写如下程序： Pfivate Sub Commandl Click() Dim score As Integer score=86 Ifscore>85 Then r=1 ElseIfscore＞60 Then r=2 Else r=0 End If P

二级VB

NCRE全国计算机二级

在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivateXAsIntegerPrivateSubCommand1_Click() X＝5：Y＝3

以下关于过程及过程参数的描述中，错误的是( )。

设有如下Command1的单击事件过程及fun过程：PrivateSubCommand1_Click() DimxAsInteger x＝Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate

窗体上有1个名称为Text1的文本框，1个名称为Timer1的计时器，且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是，单击窗体，则每隔2秒钟在Text1中显示一次当前时间。Priva

以下()控件没有Caption属性。

下列关于窗体的描述中，错误的是()。

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。

下面属于系统软件的是

为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为( )。

以下叙述中正确的是()。

对下列成语解释得不恰当的是()。

所谓“寒从中生”病机，主要是指

李永宏于2003年离家出去打工后就没有任何消息，下列做法合乎法律规定的是()。

会计监督应贯穿于经济业务发生的全过程。()

下列关于期货交易保证金的说法中，正确的有()

下列关于押品种类的说法正确的是()。

下列选项中，属于动作技能的是()

一个校园网主干网有4台Catelyst6500核心交换机SW1-SW4，它们的优先级值依次为8192、24576、20480和16384，要将SW4作为根交换机，SW4优先级的正确配置是()。

1.Discussion--about5minutesInthispartofthetestyouaregivenadiscussiontopic.Youhave30secondstolookatthepro

InAmericanIndianart,thesupposeddistinctionbetweenmodernandtraditionalwasfabricatedbycritics,andwhenartistshave

在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivateXAsIntegerPrivateSubCommand1_Click()　　X＝5：Y＝3　　

以下关于过程及过程参数的描述中，错误的是(　　)。

设有如下Command1的单击事件过程及fun过程：PrivateSubCommand1_Click()　　DimxAsInteger　　x＝Val(InputBox("请输入一个整数"))　　fun(x)EndSubPrivate

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是(　　)。

为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(　　)。