首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Tex
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Tex
admin
2019-06-11
70
问题
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Text2,其初始内容为空的文本框,如图3-104所示。程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in3.dat文件中已按升序排列的30个整数读入一维数组a中,并同时显示在Text1文本框内;
②单击“查找”按钮,将弹出输入框接收用户输入的任意一个偶数,若接收的数为奇数,则提示重新输入。如果接收的偶数超出一维数组a的数值范围,则无须进行相应查找工作,直接在Text2内给出结果;否则,在一维数组a中查找该数,并根据查找结果在Text2文本框内显示相应信息。命令按钮的Click事件过程已给出,但“查找”按钮的Click事件过不完整,请将其中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
(2)考生文件夹下的工程文件sjt4.vbp中有一个初始内容为空的文本框Text1,一个包含三个元素的文本框控件数组Text2,两个标题分别是“读数据”和“统计”的命令按钮,两个分别含有三个元素的标签控件数组Label1和Label2,如图3-105所示。程序功能如下:
①考生文件夹下in4.dat文件中存有20个考生的考号及数学和语文单科考试成绩。单击“读数据”按钮,可以将in4.dat文件内容读入到20行3列的二维数组a中,并同时显示在Text1文本框内;
②单击“统计”按钮,则对考生数学和语文的平均分在“优秀”、“通过”和“不通过”三个分数段的人数进行统计,并将人数统计结果显示在控件数组Text2中相应位置。其中,平均分在85分以上(含85分)为“优秀”,平均分在60~85分之间(含60分)为“通过”,平均分在60分以下为“不通过”。
命令按钮的Click事件过程已经给出,但“统计”按钮的Click事件过程不完整,请将其中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt3.vbp,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If num/ 2 <>Fix(num/2) Then If num<a(1) Or num>a(30) Then If a(n)=num Then If n>30 Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Avg=a(i,2)+a(i,3)) /2 Case Is>=85 Case 60 To 84 End Select Text2(n-1)=x(n) 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/iVUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimmAsInteger,nAsIntegerm=2:n=1SelectCasemCase1SelectCasenCase1Print"AAA"Ca
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommand1_Click()DimiAsIntegerFori=1To500Ifp(i)Thens=s+1NextPrint
设有如下事件过程:PrivateSubCommand1_Click()Dimaa=Array(12,3,8,5,10,3,5,9,2,4)Fork=1To9Printfun(a(k-1),a(k));"";NextkEndSub
假定有如下程序:PrivateSubFormClick()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1:J=J+N*(N+1)LoopPrintN;JEndSub运行
某人为计算n!(0<n<=12)编写了下面的函数过程:PrivateFunctionfun(nAsInteger)AsLongDimpAsLongp=1Fork=n-1To2Step-1p=p*kNextkfun=pEn
在窗体上画1名为Command1的命令按钮和1名Text1的文本框,再编写如下程序:DimssAsStringPrivateSubCommand1_Click()PrivateSubText1_KeyPress(KeyAscii_
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
下面描述中不属于数据库系统特点的是
数据库系统的核心是()。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为
随机试题
下列选项中,烧伤休克期造成休克的主要原因是()。
患者,女性,19岁,因外伤后常觉胸痛头痛,日久不愈,痛如针刺而有定处,脉弦紧,舌边有瘀点或瘀斑者。治宜选用
某市某区人民政府决定将区建材工业局管理的国有小砖厂出售。小砖厂的承包人以侵犯其经营自主权为由提出行政复议申请,本案的行政复议机关应当是下列哪一个?
2011年3月5日,温家宝代表国务院,向十一届全国人大四次会议作了政府工作报告。报告指出:“把就业放在经济社会发展的优先位置。加强职业培训和就业服务,促进高校毕业生、农村转移劳动力、城镇就业困难人员就业,做好退役军人就业安置工作。”下列对此有关的论述,说法
某建设单位领取施工许可证后,因工程材料紧缺,不能按期开工的,应当向发证机关申请延期,可延期次数和每次期限分别为()。
某铁路桥梁工程构造如下:桥墩基础采用直径为1.5m,桩长25~30m的钻孔桩,低桩承台;桥梁下部结构为一般墩台。地质条件如下:原地面往下依次为黏土、砂性土。其中靠岸桥墩桩基中有6个桩孔没有地下水。施工前和施工过程中存在以下情况:(1)承包人配置的桩基成
对于买入套期保值而言,基差走弱,套期保值效果是()。(不计手续费等费用)
短距离跑的最大特点是用最短的时间发挥最高的速度,其主要影响因素是()。
什么是滞胀?请用两种经济分析框架阐释这一宏观经济现象。[武汉大学819宏微观经济学2008研]
Ifthevariousadvocatesoftheconflictingoptionsareallsmart,experienced,andwell-informed,whydotheydisagreesocompl
最新回复
(
0
)