首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2017-04-25
40
问题
编写如下程序:
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/lhGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
结构化程序设计主要强调的是______。
要设置窗体为固定对话框,并包含控制莱单栏和标题栏,但没有最大化和最小化控钮,设置的操作是
在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程:PrivateSubForm_loab()List.AddItem″357″List.AddItem″246″List.AddItem″123″List.Add
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerX=2
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnu
以下叙述中错误的是______。
在面向对象的程序设计中,下列叙述错误的是______。
下列叙述中正确的是()。
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括______。
随机试题
已知φo(Ag+/Ag)=0.799V,Ag2C2O4的溶度积常数为3.5×10-11。求Ag2C2O4+2e-=2Ag+C2O42-,φo(Ag2C2O4/Ag)为()。
急性黄疸型肝炎黄疸前期最突出的症状是
患儿女,10个月,足月产,反复腹泻1个月余,每天5—6次;时稀时稠,生后混合喂养;未添加辅食,查体:神清,表情呆滞,体重4.8kg,腹软,腹壁脂肪消失。患儿住院第2天晨起突然神志不清,面色苍白。脉搏细弱,呼吸表浅,出冷汗,首先应静脉注射的是(
西周时期婚姻“六礼”中的“纳征”指:()
甲冒充房主王某与乙签订商品房买卖合同,约定将王某的住房以220万元卖给乙,乙首付100万元给甲,待过户后再支付剩余的120万元。办理过户手续时,房管局工作人员识破甲的骗局并报警。根据司法解释,关于甲的刑事责任的认定,下列哪一选项是正确的?()(20
某区环保局因某新建水电站未报批环境影响评价文件,且已投入生产使用,给予其罚款10万元的处罚。水电站不服,申请复议,复议机关作出维持处罚的复议决定书。下列说法中正确的是()。
账务处理系统中的数据备份只需将计算机内的凭证、科目表和账簿文件复制到硬盘上予以保存即可。()
下列关于会计账簿的说法正确的是()。
你辖区内部分居民饮用了某品牌的桶装饮用水后出现了腹泻的症状。甚至有人住院。有网友质疑是食品药品监督管理局监管不力,媒体也跟进报道,网站纷纷转载。假如你是该辖区食品监管部门的工作人员,领导让你去解决此事,你怎么处理?
Thefarmershadtowearheavybootsinwinterbecausethefieldsweresowetand______.
最新回复
(
0
)