首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Tex
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Tex
admin
2019-06-11
52
问题
(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://www.kaotiyun.com/show/iVUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimmAsInteger,nAsIntegerm=2:n=1SelectCasemCase1SelectCasenCase1Print"AAA"Ca
设窗体上有一个名称为Check1的复选框,并有下面程序代码:PrivateSubCheck1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Check1.V
设有如下程序:PrivateSubsV(ByValmAsInteger,nAsInteger)m=m*2:n=n-5:Printm;nEndSubPrivateSubForm_Click()DimxAsInteger,
有下面程序代码:PrivateSubCommand1_Click()DimxAsInteger,SAsIntegerx=1Fork=1To3x=x+1:procx:s===s+xNextkPrintsEndSubP
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNextiCombo1.Text=SumEndSub程
在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()n=0Fori=0To10X=2*i-1IfXMod3=0Thenn=n+1NextiPrintnEnd
设a=2,b=3,c=4,d=5,表达式Nota<=cOr4*c:b^2Andb<>a+c的值是
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是
在E—R图中,用来表示实体联系的图形是
要计算x的平方根并放入变量y,正确的语句是
随机试题
企业各生产环节的工作,不能出现前松后紧、忽高忽低的现象,即要保证生产过程的
不符合含铁血黄素的描述是
甲、乙、丙订立的发起人协议中关于公司名称、出资方式的约定为什么不符合法律规定?请说明理由。光明公司与美国丁公司达成的初步协议中有哪些不符合我国法律规定之处,为什么?
工程建设投资的最高限额是:[2009年第4题]
原始凭证按填制手续和内容不同,可分为()。
商业银行查询个人信用报告时应当取得被查询人的()。
某房产商取得一块居住用地,预计开发面积80000m2。已知该地皮购置费用为24000万元,前期开发费用300万元,建筑安装:[程费为2000元/m2,施工管理费200万元,基础设施建设费为600万元,各种税费为销售收入的6%。其他成本可忽略不计。商品住宅售
用来描述企业员丁与企业(股东或经理)之间的利益矛盾与均衡的模型是()。
使用netstat-an命令可显示所测试网络的(42)。
Aslongasthenuclearfamilyis(i)______alargerkinshipgroupthroughcontiguousresidenceonundividedland,thepressuret
最新回复
(
0
)