首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知出租车行驶不超过4千米时一律收费10元。超过4千米时分段处理,具体处理方式为:15千米以内每千米加收1.2元,15千米以上每千米收1.8元。在考生文件夹下有一个工程文件sjt4.vbp。程序的功能是:单击“输入”按钮,将弹出一个输入对话框,接收出租车行
已知出租车行驶不超过4千米时一律收费10元。超过4千米时分段处理,具体处理方式为:15千米以内每千米加收1.2元,15千米以上每千米收1.8元。在考生文件夹下有一个工程文件sjt4.vbp。程序的功能是:单击“输入”按钮,将弹出一个输入对话框,接收出租车行
admin
2019-06-11
76
问题
已知出租车行驶不超过4千米时一律收费10元。超过4千米时分段处理,具体处理方式为:15千米以内每千米加收1.2元,15千米以上每千米收1.8元。在考生文件夹下有一个工程文件sjt4.vbp。程序的功能是:单击“输入”按钮,将弹出一个输入对话框,接收出租车行驶的里程数;单击“计算”按钮,则可根据输入的里程数计算应付的出租车费,并将计算结果显示在名称为Text1的文本框内。
在窗体文件中已经给出了全部控件(如图3-166所示),但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后将修改后的文件按原文件名存盘。
选项
答案
审题分析 本题源程序通过使用Select Case语句对输入的数据(已赋值给变量s)进行检验,若不超过4,则按f=10计算;若在15以内,则按f=10+(s-4)*1.2计算;若在15以上,则按f=10+(15-4)*1.2+(s-15)*1.8计算。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: Select Case s f=10 f=10+(s-4)*1.2 Case Else f=10+(15-4)* 1.2+(s-15)*1.8 步骤2:按要求将文件保存至考生文件夹中。 考点链接 多分支结构。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/WNUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNextiCombo1.Text=SumEndSub程
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
窗体上有一个Text1文本框,并编写了下面事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)KeyAscii=KeyAscii+3EndSub程序运行时,在文本框中输入字符“A”,则在文本框中
两个或两个以上模块之间关联的紧密程度称为
设有如下声明语句OptionBase1Dimart(2,-1To5)AsInteger则数组art中数组元素的个数是
在利用菜单编辑器设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
产生100以内(不含100)2位随机整数的VisualBasic表达式是
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
随机试题
宋代之所以把都城建在平原地区的开封,主要是为了就汴河的【】
下列沟通方式中,哪一种方式最有利于分权()
A.求同法B.类推法C.共变法D.求异法E.排除法根据大量调查,乙型肝炎病毒感染者肝癌的发病率远远高于非感染者,因而考虑乙型肝炎病毒感染与肝癌的发生有关,这种建立病因假说的思维方法属于
针对不同类型的贷款,对于企业现金流量的分析侧重点则是统一的。()
________是四幕舞剧《天鹅湖》第二幕中的舞曲,该曲是舞剧中最受人们欢迎的舞曲之一,这首舞曲音乐轻松活泼,节奏干净利落,形象地描绘出了小天鹅在湖畔嬉游的情景,质朴动人的旋律还富于田园般的诗意。
简述乐段间奏的作用。
安定团结
法律的运行是一个从创制、实施到实现的过程。我国社会主义法律的运行过程主要环节具体包括()
下列叙述中正确的是
Completethesummaryusingthelistofwords,A-l,below.Writethecorrectletter,A-l,inboxes9-12onyouranswersheet.
最新回复
(
0
)