首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个控件数组,一个名称为Text,含有三个文本框;另一个名称为Cmd,含有三个命令按钮,且“暂停”按钮的初始状态为不可用。如图1-219所示。请画一个计时器Timer1,设置时间间隔为1秒,初始状
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个控件数组,一个名称为Text,含有三个文本框;另一个名称为Cmd,含有三个命令按钮,且“暂停”按钮的初始状态为不可用。如图1-219所示。请画一个计时器Timer1,设置时间间隔为1秒,初始状
admin
2018-10-29
51
问题
(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://www.kaotiyun.com/show/ItFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能够触发文本框Change事件的操作是( )。
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePerson nameAsString*8 majorAsSt
为了在运行时能显示窗体左上角的控制框(即系统菜单),应执行的操作是
在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() x=1 s=0 Fori=1To5 x=x/i s=s+x Next Print
运行如下程序PrivateSubCommand1_Click() Dima(5,5)AsInteger Fori=1To5 Forj=1To4 a(i,j)=i*2+j Ifa(i,
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
能够产生1到50之间(含1和50)随机整数的表达式是( )。
窗体上有名称为Command1的命令按钮,名称分别为Label1、Label2、Label3的标签。编写如下程序:PrivatexAsIntegerPrivateSubCommand1_Click() StaticyAsIntege
下面关于VB数据文件的叙述中错误的是()。
随机试题
A.菌毛B.芽胞C.磷壁酸D.荚膜E.透明质酸酶具有黏附作用的细菌结构是
护士小刘遵医嘱为患者王某行导尿术时,发现手套破裂,她应该()
根据以下材料。回答下列题目:宋涛,男,56岁;刘梅,女,55岁,二人均早年丧偶,宋涛的儿子丁丁,2006年参加工作后和父亲分开居住。刘梅身边有一个儿子东东。2007年宋涛与刘梅经人介绍结婚,东东跟着他们在一起生活。2008年,刘梅因病去世,没有留下遗嘱。
纳税人对税务机关作出的不依法确认纳税担保行为不服,需要先向复议机关申请行政复议,对行政复议决定不服的,可以再向人民法院提起行政诉讼。()
晚上在强光灯前要有一段时间才能适应是感觉的()特性。
法国思想家卢梭曾说:一切法律中最重要的法律,既不是刻在大理石上.也不是刻在铜表上,而是铭刻在公民的内心里。请谈谈你对这句话的理解。
M公司为客户提供网上服务,客户有很多重要的信息需通过浏览器与公司交互。为保障通信的安全性,其Web服务器应选的协议是_______。
软件是指( )。
在关于输入掩码的叙述中,正确的是()。
Whatarethespeakersmainlydiscussing?
最新回复
(
0
)