首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp。程序运行时,单击“装入数据”按钮,则从考生目录下的in5.txt文件中读入所有城市名称和距离,城市名称按顺序添加到列表框List1中,距离放到数组a中;当选中列表框中的一个城市;时,它的距离就显示在Text1中
在考生文件夹下有一个工程文件sit5.vbp。程序运行时,单击“装入数据”按钮,则从考生目录下的in5.txt文件中读入所有城市名称和距离,城市名称按顺序添加到列表框List1中,距离放到数组a中;当选中列表框中的一个城市;时,它的距离就显示在Text1中
admin
2019-03-14
48
问题
在考生文件夹下有一个工程文件sit5.vbp。程序运行时,单击“装入数据”按钮,则从考生目录下的in5.txt文件中读入所有城市名称和距离,城市名称按顺序添加到列表框List1中,距离放到数组a中;当选中列表框中的一个城市;时,它的距离就显示在Text1中,如图2-157所示;此时,单击“计算运费”按钮,则计算到该城市的每吨运费(结果取整,不四舍五入),并显示在Text2中。每吨运费的计算方法足:距离×折扣×单价。
其中:单价为0.3。距离<500折扣为1
500≤距离<1000折扣为0.98
1000≤距离<1500折扣为0.95
1500≤距离<2000折扣为0.92
2000≤距离折扣为0.9
单击“保存”按钮,则把距离和每吨运费存到文件out5.txt中。已经给出了,所有控件和部分程序,
要求:
①去掉程序中的注释符,把程序中?改为正确的内容;
②编写列表框的Click事件过程;
③编写“计算运费”按钮的Click事件过程。
注意:不得修改已经存在的程序:在退出程序之前,必须至少计算一次运费,且必须用“保存”按钮存计算结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生义件灾下的奉题工程文件sit5.vbp。 步骤2:在代码编辑窗口,去掉程序中的注释符“*”,将问号“?”改为正确的内容。 参考代码: n=n+1 Listl.AddItem ch$ 步骤3:编写“计算运费”按钮和列表框的单击事件过程。 参考代码: Private Sub Command2一Click() P=0.3 d=Int(Text1.Text/500) Select Case d Case 0 discount=1 Case 1 discount=0.98 Case 2 discount=0.95 Case 3 discount=0.92 Case Else discount=0.9 End Select Text2=Int(diScount*P*Text1) End Sub Private Sub Listl—Click() Text1=a(Listl.ListIndex+1) End Sub 步骤4:运行程序,单击列表框中的某个列表项,并单击“计算运费”按钮获得一个结果,然后单击“保存”按钮保存计算结果。 步骤5:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/WdFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
支持子程序调用的数据结构是( )。
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放入Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
下面不属于软件需求分析阶段主要工作的是
设有数组声明语句如下:Dima(-1to2,,0to5)a所包含的数组元素个数是
下面控件中,没有Caption属性的是( )。
在窗体上有4个文本框,名称分别为Text1、Text2、Text3、Text4,和1个名称为Command1的命令按钮,然后编写如下程序代码:PrivateSubCommand1_Click()Dimyear%,month%,days
下面程序的功能是利用随机数函数模拟掷骰子。方法是每次随机产生一个1~6的整数,相当于一次掷骰子。程序运行后,在Text2文本框中输入总投掷次数(例如10000),单击"开始投掷"按钮则进行模拟掷骰子,并把出现1~6的次数分别显示在文本框数组Text1(从上
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
在编辑VB应用程序时,如果不小心关闭了属性窗口,则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口,这个按钮的图标是
按照“后进先出”原则组织数据的数据结构是
随机试题
管理的二重性是指管理的()。
The"standardofliving"ofanycountrymeanstheaverageperson’sshareofthegoodsandserviceswhichthecountryproduces.
患儿,10个月,方颅,多汗,胸骨肋膈沟,血钙正常,血磷低,X线可见骨骺软骨增宽,干骺端临时钙化带模糊,并呈毛刷状改变,最可能的诊断是
刚性角较小的基础是()。【2016年真题】
与固定资产扩张相关的借款需求,其关键信息主要来源于公司管理层。()
M公司采用累计发生成本占预计合同总成本的比例确定完工进度,采用完工百分比法确认合同收入。2013年M公司签订一项承担A工程建造任务的合同,该合同为固定造价合同,合同金额为1000万元。工程自2013年5月开工,预计2015年3月完工。M公司2013年实际发
步骤1单击[样式]组中的[套用表格格式]按钮,单击[表样式浅色13],如图4—10所示。[*]步骤2在[套用表格格式]对话框中选中[表包含标题]复选框,单击[表数据来源]右侧的折叠对话框按钮,如图4—11所示。[*]步骤3选中单元格区域
网络商务信息收集后,需要进行整理,(42)不属于信息整理工作。
请编写一个函数voidfun(char*tt,intpp[]),统计在tt所指字符串中“’a’”到“’z’”26个小写字母各自出现的次数,并依次放在pp所指数组中。例如,当输入字符串:abcdefgabcdeabc后,程序的输出结果应该是:
Seariseasaresultofglobalwarmingwouldimmediatelythreatenthatlargefractionoftheglobelivingatsealevel.Nearlyo
最新回复
(
0
)