首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个控件数组,一个名称为Text,含有三个文本框;另一个名称为Cmd,含有三个命令按钮,且“暂停”按钮的初始状态为不可用。如图1-219所示。请画一个计时器Timer1,设置时间间隔为1秒,初始状
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个控件数组,一个名称为Text,含有三个文本框;另一个名称为Cmd,含有三个命令按钮,且“暂停”按钮的初始状态为不可用。如图1-219所示。请画一个计时器Timer1,设置时间间隔为1秒,初始状
admin
2018-10-29
25
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个控件数组,一个名称为Text,含有三个文本框;另一个名称为Cmd,含有三个命令按钮,且“暂停”按钮的初始状态为不可用。如图1-219所示。请画一个计时器Timer1,设置时间间隔为1秒,初始状态为不可用,并使程序实现如下功能:
①单击“开始”按钮,则计时器Timer1和“暂停”按钮状态变为可用,且“开始”按钮的标题变为“继续”,且为不可用。与此同时,Text的三个文本框开始显示计时的小时、分、秒值;
②单击“暂停”按钮,则Timer1停止工作,“暂停”按钮变为不可用,“继续”按钮变为可用;
③单击“继续”按钮,则Timer1接着开始工作,“继续”按钮变为不可用,“暂停”按钮变为可用;
④单击“结束”按钮,则结束程序运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“所有行中最大数的平均值为”的标签Label1,再画一个初始内容为空的文本框Text2,如图1-220所示。程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in4.dat文件的内容读入20行5列的二维数据a 中,同时显示在Text1文本框中;
②单击“计算”按钮,则自动统计二维数组中每行最大数的平均值(截尾取整),并将最终结果显示在Text2文本框内。
“读数据”按钮的Click事件过程已经给出,请编写“计算”按钮的Click事件过程实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt3.vbp,在窗体上画一个计时器控件,其名称设置为Timer1,Interval属性值设置为1000,Enabled属性值设置为False。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Select Case Index Timer1.Enabled = True Cmd(0).Enabled = False If t(3) = 60 Then Text1(i - 1).Text = t(i) 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4.vbp。 步骤2:打开代码编辑窗口,编写“计算”按钮的单击事件。 参考代码: If Len(Text1) = 0 Then MsgBox "请先执行“读数据”功能!" Else For i = 1 To 20 Max = a(i, 1) For j = 2 To 5 If a(i, j)>Max Then Max = a(i, j) Next j s = s + Max Next i Avg = s/20 Text2 = Avg End If 步骤3:按<F5>键运行程序,先单击“读数据”按钮,然后单击“计算”按钮,最后单击窗体右上角的关闭按钮结束程序。
解析
转载请注明原文地址:https://kaotiyun.com/show/ItFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项( )。
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:PrivateSubCommand1_Click() DimsAsString,chAsString s="" Fork=1ToLen(Te
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePerson nameAsString*8 majorAsSt
支持子程序调用的数据结构是( )。
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
以下能接收焦点的控件是
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
随机试题
资本市场是融通长期资金的市场,它又可以分为()
女,48岁。无意中发现右乳内上象限肿块一天,遂行相关影像学检查。目前最常用的乳腺肿瘤影像学检查方法是
男性,37岁,3d前肝门周围持续性跳痛,肛周皮肤红肿,有硬结和压痛,他最可能患了
质量数据的特征值中,描述数据离散趋势的特征值有()。
甲公司对投资性房地产一直采用成本模式进行后续计量。2008年1月1日,由于房地产交易市场的成熟,已满足采用公允价值模式进行计量的条件,甲公司决定对投资性房地产从成本模式转换为公允价值模式计量,甲公司的投资性房地产为一出租的办公楼,该大楼原价5000万元,已
(二)某企业大批量生产某种单一产品,该企业为了编制下年度的年度、季度计划,正进行生产能力核算工作。该企业全年制度工作日为250天,两班制,每班有效工作时间为7.5小时。已知:某车工车间共有机床20台,该车间单件产品时间定额为1小时;某钳工车间生产面积145
对于附有质量保证条款的销售,下列项目中,企业将所承诺的质保作为履约义务进行会计处理的有()。
本文第2段中划线部分“这个问题”指的是()。
Onlywhenwehurriedtotheairport______theflightwascanceled.
Thechronicstateofaffairsatthattimewaswarbetweenstatesandcivilwarswithinanation.
最新回复
(
0
)