首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 Else Ifscore>60
编写如下程序: Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 Else Ifscore>60
admin
2020-04-18
56
问题
编写如下程序:
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://kaotiyun.com/show/VqTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图2.100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
下列叙述中正确的是( )。
窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:PrivateSubCommand1_Click() CD1.Filter="AllFile|*.*|TextFile|*.txt|Word|*.
标准模块中有如下程序代码:PublicxASInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:Pr
以下能正确定义数据类型SystemInfo的代码是()。
某人编写了下面的程序,希望能把Text1文本框中的内容写到Temp.txt文件中PrivateSubCommand1_Click()Open"Temp.txt"ForOutputAs#2Print"Text1"
从键盘上输入一个浮点数asmgle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asmgle=InputBox("请输入一个浮点数:")str1$=Str$(asingle
(1)考生文件夹中有工程文件sjt3.vbp。在窗体上有名称为Combo1的组合框,请设置该组合框的属性,使该组合框只能用于选择操作,不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项,如图5(a)所示,
下列关于函数过程的叙述中,正确的是()。
某二叉树中有n个度为2的结点,则该二叉树中的叶子结点数为
随机试题
若眩晕较甚,阴虚阳浮,应注意预防下列哪种病的发生:
诊断小儿疾病,特别重要的诊查方法是()
女10岁。阵发性腹痛,黑便2天,双下肢散在出血点,双膝关节肿胀,腹软,右下腹压痛,白细胞12.5×109/L,血小板200×109/L,血红蛋白110g/L,尿常规:蛋白质(+),红细胞(+)/HP,颗粒管型0~3个/HP。诊断可能是()
期货交易所章程应当载明会员资格及其管理办法。( )
某公司去年每股收益为3元,去年每股分配现金红利2元,预计今年股利分配以3%的速度增长,假定必要收益率为5%,股利免征所得税,那么()
目前,中央在城市中清理各种歧视农民工的法律和法规,维护进城农民工的合法权益。这主要体现了()。
学校应当与未成年学生的父母或者其他监护人互相配合,在保证未成年学生的睡眠、娱乐和体育锻炼时间的前提下,可适当增加其学习负担。()
信号检测论相对于经典心理物理学方法的优点是什么?
______airandmarinetransportationhasgreatlyexpandedbutisunderstricterinternationalregulation?______arcticstates
Medicalresearchhasshownthatthewidespreaduseofcigarettes______(促进了癌症的增加)
最新回复
(
0
)