首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl Click() Dim scoreAs Integer score=86 If score>85 Then r=1 ElseIfscore>60 Then r=2 Else r=0 End If P
编写如下程序: Private Sub Commandl Click() Dim scoreAs Integer score=86 If score>85 Then r=1 ElseIfscore>60 Then r=2 Else r=0 End If P
admin
2015-12-09
35
问题
编写如下程序:
Private Sub Commandl Click()
Dim scoreAs Integer
score=86
If score>85
Then r=1
ElseIfscore>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
<语句块1>
[ElseIf<条件2>Then
<语句块2>]
…
[EIse
<语句块n>]
EndIf
如果“条件1”为True,则执行“语句块1”并跳出结构;否则如果“条件2”为True,则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。
转载请注明原文地址:https://kaotiyun.com/show/f8Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
按"先进后出"原则组织数据的数据结构是【】。
要使文本框获得输入焦点,则应采用文本框控件的
下列程序运行时输出的结果是OptionBase1PrivateSubForm_Click()Dimx(10)AsInteger,y(5)AsIntegerFori=1to10x(i)=10-i+1NextF
在窗体上有一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(5)AsStringFORi=1To5a(i)=Chr(Asc("A")+(i-1))NextForEachb
有如下程序:PrivateSubCommand1_Click()a$="AWORKERISHERE"x=Len(a$)Fori=1Tox-1b$=Mid$(a$,i,3)Ifb$="WOR",ThenS=S+1NextP
要使文本框获得输入焦点,则应采用文本框控件的方法是
在窗体上画一个文本框(其Name属性为Text1),编写下列事件过程,运行结果是______。PrivateSubForm_Load()ShowText1.Text="你好!"Text1.SetFocusFori=1To15Sum=S
下列控件中可自动设置滚动条的是______。
为了防止用户随意将光标置于控件上,应()。
随机试题
在工艺管架中管路采用U型管的目的是()。
ADreamoftheRedMansionissaid______intodozensoflanguagesinthelastdecade.
易风化药物可使胶囊壳
监理单位为完成监理任务所需要的工程资料,应当( )。
生产经营单位使用的涉及生命安全、危险性较大的特种设备,以及危险物品的容器、运输工具在投入使用前,不需要符合以下哪个条件。( )
通俗历史读物的健康发展,不仅是史学工作者的_______,也是出版传媒工作者肩上的重任,需要多方互相协作、共同努力,让历史不仅仅是一门象牙塔中的高深学问,更成为滋养民族心灵、让更多人读史以明智的知识_______。依次填入画横线部分最恰当的一项是(
简述贞观之治。
马克思、恩格斯批判地继承了前人的成果,实现了人类思想史上的伟大革命。马克思1845年春天写的《关于费尔巴哈的提纲》和马克思、恩格斯1844~1846年合写的《德意志意识形态》,标志着马克思主义的基本形成;1847年《哲学的贫困》和1848年2月《共产党宣言
Writeanessayof160—200wordsbasedonthefollowingpicture.Inyouressay,youshould1)describethepicturebriefly,
对下列二叉树进行前序遍历的结果是()。
最新回复
(
0
)