首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
40
问题
编写如下程序:
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全国计算机二级
相关试题推荐
按"先进后出"原则组织数据的数据结构是【】。
阅读程序:FunctionFun(aAsInteger)Staticcb=0:b=b+2:c=c+2F=a*b*cEndFunctionPrivateSubCommand1_Click()DimaAsInteg
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c="ABCD"Forn=1To4Print______NextEndSub
在设计程序时,应采纳的原则之一是
函数过程Fun1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。FunctionFun1(bAsInteger)if______ThenFun1=0ElseFun1=1EndIfEndFunction使该功能完整,应
如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的哪个属性
窗体文件的扩展名是
在窗体上画一个文本框(其Name属性为Text1),编写下列事件过程,运行结果是______。PrivateSubForm_Load()ShowText1.Text="你好!"Text1.SetFocusFori=1To15Sum=S
在窗体中添加一个命令按钮,并编写如下程序代码:程序运行后,消息对话框中显示______。
随机试题
试计算生产1t100%H2SO4需含75%FeS2的硫铁矿的理论用量?(假定硫铁矿按普通焙烧方法计算。即烧碴中的Fe以Fe2O3的形式存在)
农民田某于2004年去外国打工时在途中遇海难失踪,从此杳无音讯。2009年其妻胡某向当地人民法院申请宣告田某死亡,人民法院经审理判决宣告田某死亡。由于年幼的女儿田燕一直身体不好,家中又没有足够的经济能力给田燕治疗,2010年胡某将田燕送给膝下无子的邻村姚某
下列关于信息费与佣金关系的表述中,正确的是()。
城市地下空间规划是城市规划的重要组成部分,地下空间规划应注意保持和改善地下的()。
关于砌体工程质量验收的说法,正确的有()。
下列不属于施工合同文件组成的是()。
关于职业健康安全与环境管理体系的比较,下列说法中正确的是()。
“夫诚者,君子之所守也,而政事之本也”。政府诚信是社会诚信的一大_______,党的干部理应成为_______的表率,把说真话、办实事作为政德底线,如此才能用好手中权力,取信于民。填入划横线部分最恰当的一项是:
Withunfamiliarhumanbeings,whenweacknowledgetheirhumanness,wemustavoidstaringatthem,andyetwemustalsoavoidign
HowtoapproachReadingTestPartFive•ThispartoftheReadingTesttestsyourgrammar.•Readthewholetextquicklytofind
最新回复
(
0
)