首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)学生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1:两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Labet1,再画一个名称为Tex
(1)学生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1:两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Labet1,再画一个名称为Tex
admin
2020-07-22
36
问题
(1)学生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1:两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Labet1,再画一个名称为Text2,其初始内容为空的文本框,如图2.95所示。程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in3.dat
文件中已按升序排列的30个整数读入一维数组a中,
并同时显示在Text1文奉框内;
②单击“查找”按钮,将弹出输入框接收用户输入的任意一个偶数,若接收的数为奇数,则提示重新输入。如果接收的偶数超出一维数组a的数值范围,则无须进行相应查找工作,直接在Text2内给出结果;否则,在一维数组a中查找该数,并根据查找结果在Text2文本框内品示相应信息。命令按钮的Click事件过程已给出,但“查找”按钮的Click事件过程不完整,请将其中的注释符去掉,把?改为止确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
(2)考生文件夹下的工程文件sjt4.vbp中有一个初始内容为空的文本框Text1,一个包含三个元素的文本框控件数组Text2,两个标题分别是“读数据”和“统计”的命令按钮,两个分别含有三个元素的标签控件数组Label1和Label2,如图2.96所示。程序功能如下:
①考生义件夹下in4.dat文件中存有20个考生的考号及数学和语文单科考试成绩。单击“读数据”按钮,可以将in4.dat文件内容读入到20行3列的二维数组a中,并同时显示在Text1文本框内;
②单击“统计”按钮,则对考尘数学和语文的平均分在“优秀”、“通过”和“小通过”三个分数段的人数进行统计,并将人数统计结果显示在控件数组Text2中相应位置。其中,平均分在85分以上(含85分)为“优秀”,平均分在60~85分之间(含60分)为“通过”,甲均分在60分以下为“不通过”。
命令按钮的Click事件过程已经给出,但“统计”按钮的Click事件过程不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件sis.vbD,打开代码编辑窗口,去掉程序中的注释符“*”,将问号“?”改为正确的内容。 参考代码: If hum/2<>Fix(num/2)Then If num
a(30)Then If a(n)=num Then If n>30 Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的奉题工程文件sit4.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://jikaoti.com/ti/FWS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
数据库设计过程不包括
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsInteger DimtAsInteger t=a-b b=t+a
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) PrintText1.Text;EndSub运行程序,
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
以下叙述中错误的是( )。
下列关于菜单项的描述中,错误的是
在窗体上有一个文本框Textl,Text属性值为空,然后编写如下事件过程:PrivateSubTextlKeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
下列关于窗体的描述中,错误的是()。
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
随机试题
下列作品中,写了人物一生遭际的传记是()
教育对社会经济政治制度的变化起()
患者,女,40岁。反复腹泻3个月,近半月黏液脓血便,3~4次/天,伴左下腹疼痛,里急后重感。多次便细菌培养(-)。钡剂灌肠见直肠和乙状结肠肠壁呈毛刺状改变并可见小龛影。最可能的诊断是
2个月以上小儿首次接种卡介苗下列哪项最重要
最易虫蛀的中药饮片是
期货投机者是( )。
不能依法定程序予以废止的是( )。
Morethanamonthafterthedeadlineforcityrestaurantstostoppreparingfoodwithartificialtransfat,somefast-foodchain
DearMr.Suzuki,ThegoodswereceivedonJuly15werefoundnottomatchourorder.ThegoodsweorderedwereItemNo.2345
"Tear’emapart!""Killthefool!""Murderthereferee(裁判)!"Thesearecommonremarksonemayhearatvarioussportingevents
最新回复
(
0
)