首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。 Private Sub Command1_Click() Dim x As Single x=InputBox("
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。 Private Sub Command1_Click() Dim x As Single x=InputBox("
admin
2012-03-22
34
问题
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。
Private Sub Command1_Click()
Dim x As Single
x=InputBox("请输入x的值!")
Select Case x
Case Is<50
y=0.8*x
Case 50 To 100
y=0.7*x
______
Print"输入的数据出界!"
End Select
Print x,y
End Sub
选项
答案
Case Else
解析
[命题目的] 考查考生对多分支控制结构的掌握。
[解题要点] 阅读程序后,在Select case结构中,只有两个Case子句,分别表示x取值的两种情况,但题目中将x的值分为3种情况,空白处应该填写case Else语句。
[错解分析] 嵌套使用多分支控制结构时,应注意程序执行过程。
[考点链接] Select Case…End Select多分支结构语句应用。
转载请注明原文地址:https://jikaoti.com/ti/KqO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件调试的目的是( )。
Java程序的执行过程中用到一套JDK工具,其中java.exe是指()。
下列关于栈的叙述正确的是()
在数据管理技术发展过程中,文件系统与数据库系统的主要区别是数据库系统具有( )。
一个类只有实现了【】接口,它的对象才是可串行化的。
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型: PrivateTypeanimal animalNameAsString*20 aColorAsString*10 EndType 在窗体上画一个名称为Command
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() Move500,500 EndSub 程序运行后,单击命令按钮,执行的操作为
在窗体上画一个名称为“Command1”,标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会自
如果要将形状控件的内部设置为水平线,应将Fillstyle属性设置为【】。
随机试题
静脉输液不慎发生致死的空气栓塞的部位是
中国甲公司(卖方)与德国乙公司(买方)签订水果销售合同,合同约定以信用证方式付款,有效期为8月20日。后来,中国卖方要求德国买方将有效期延长至8月30日,买方同意,但是忘记将有效期延长的消息告知银行。甲公司于8月22日向银行议付,则下列说法中正确的是(
房地产估价可在下列活动中发挥作用()。
《教师职业道德行为规范》提出,教师在处理与家长的关系时,要与家长沟通。关于教师与家长的沟通,下列说法正确的是()。
关于领导力的书籍和资料现在已经是_________,领导力大师们的演讲也是信手可以获得的信息,为什么缺乏领导力仍然是一个困扰企业的问题?也许答案在于,对于大多数领导来说,最大的问题不是不懂得如何去领导,而是出在他们____________领导的过程中。依次
一深一浅的两种阅读路径,并没有随着传播技术的提升、书籍载体的变迁而并轨。甚至,浅阅读更胜一筹了,阅读碎片化就是重要的表现形式之一。诚然,零珠散玉也有价值,但阅读求知若一味追求省事,大脑沟回会变浅的。其实,用什么阅读不是核心,真正的读书人是不在乎书的形式的,
下列表述正确的是()。
周某以公司债券出质,债券上未进行任何记载。周某按约定将债券交付给质权人。下列说法哪项是正确的()。
Whatconclusioncanbedrawnfromthescientists’observation?
Thefollowingisapassageaboutinventorsandtheirinventions.Newinventionsareappearingeverydaytomakeourlivesea
最新回复
(
0
)