首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要
admin
2018-05-08
51
问题
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。最后,程序按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图3.39所示。
在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Timerl.Enabled=True Timerl.Interval=1000 n=n+1 If Text1.ForeColor=0 Then 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: MoveArray a(),m For k=1 To m a(j) =a(j + 1) a(n) =x 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)题目要求5秒显示一次当前时间,8秒改变一次颜色,但是程序中之使用了一个定时器,因此必须在这个定时器里面做两个事情:刷新时间和改变颜色。分析代码,根据“If n Mod 5=0 Then”和“If n Mod8=0 Then”可知,定时器的周期为1秒;题目要求在单击窗体时开始更新时间和改变颜色,因此在窗体的Click事件代码里面需要使能定时器,即把定时器的Enabled属性设置为True;在定时器的Timer事件代码里面,根据n的值去显示时间和改变颜色,因此n记录了程序运行了多少秒,即每次Timer事件处理n的值应该加1;第四个“?”处是判断文本框当前的颜色,如果是0则改变成&HFF,否则改成0,实现颜色的切换。
(2)题目要求对一列数据进行移动,分析程序可知,在“产生随机数”命令按钮的事件代码里面,生成的随机数保存在数组a当中。在“移动数据”命令按钮的事件代码里面,调用过程MoveArray对数组数据进行移动。MoveArray过程通过一个嵌套的循环来移动数组数据,移动的方法是每次取出第一个数据,然后把后面的数据往前移动,再把取出来的第一个数据放到最后,如此完成一个数据的移动。第一个“?”处是补充函数调用的参数,MoveArray过程有两个参数,第一个参数是数组,第二个参数是Integer类型参数,表示把前面多少个数据移动到后面,即第二个参数为m;第二个“?”处是补充循环的结束条件,内层循环是从把数据往前面移动,因此外层循环是控制前面移出多少个数据,即循环的次数由入参m决定;第三个“?”处的循环把数据从后往前移,即把后面的一个数据赋值给前面一个,完成一格移动;最后一个“?”处是把取出来的a(1)放到最后一个元素位置。
转载请注明原文地址:https://kaotiyun.com/show/0eGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
现有如下程序:PrivateSubCommandl_Click()s=0Fori=1To5s=s+f(5+i)Next
编写如下程序:PrivateSubCommandl_Click()DimnAsLong,sAsStringn=InputBox(”输入一个数”)DoWhilen
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommandl_Click()Dimx1AsInteger,x2AsIntege
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为
下面关于标准模块的叙述中错误的是
为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为
为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效,必须把它的Style属性设置为
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图2-93所示。要求如下:①利用属性窗口设置适当的属性:为Listl列表框添加三个项目:宋体、黑体、楷体_GB2312;Textl文本框设置初始值为”计算机”;Hscroll1水
设有如下事件过程:PrivateSubCommand1_Click()ch="ABCDEFG"n=Len(ch)k=1DoPrintMid(ch,k,1);Mid(ch,
随机试题
简述小说《奥利弗·退斯特》节选部分的艺术特征。
用酸水提取中药中的生物碱时,可用
下述说法错误的是
协调性宫缩乏力可从阴道分娩者,其护理计划为:
可以快速输注且有利尿作用的液体是()。
某化工生产基地,在进行防火设计时,根据不同泡沫系统的功能,为不同储罐设置了相应的泡沫灭火系统。其中,()应选用液下喷射泡沫灭火系统。
持有一种权益类证券的市值与其总市值的比例不得超过(),但因包销导致的情形和中国证券监督管理委员会另有规定的除外。
某高铁线路建设公司占用林地3万平方米用于办公楼的建设,另占用经济林地4万平方米用于建设高铁线路,所占耕地适用的定额税率为15元/平方米。该企业应缴纳耕地占用税()万元。
该商场1995年销售额最高的月份是()。该商场1995年10月份比9月份销售额增加了多少?()
It’s10pm.Youmaynotknowwhereyourchildis,butthechipdoes.Thechipwillalsoknowifyourchildhasfallenandne
最新回复
(
0
)