首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要求:去掉
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。 要求:去掉
admin
2017-03-27
48
问题
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。最后,程序按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图3—39所示。
在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Timer1.Enabled=True Timer1.Interval=1000 n=n+1 If Text1.ForeColor=0Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: MoveArray a(),m For k=1To m a(j)=a(j+1) a(n)=x 步骤2:按要求将文件保存至考生文件夹中。
解析
第1小题:题目要求5秒显示一次当前时间,8秒改变一次颜色,但是程序中之使用了一个定时器,因此必须在这个定时器里面做两个事情:刷新时间和改变颜色。分析代码,根据“If n Mod5=0Then”和“If n Mod8=0Then”可知,定时器的周期为1秒;题目要求在单击窗体时开始更新时间和改变颜色,因此在窗体的Click事件代码里面需要使能定时器,即把定时器的Enabled属性设置为True;在定时器的Timet事件代码里面,根据n的值去显示时问和改变颜色。因此n记录了程序运行了多少秒,即每次Timer事件处理n的值应该加1;第四个“?”处是判断文本框当前的颜色,如果是0则改变成&HFF,否则改成0,实现颜色的切换。
第2小题:题目要求对一列数据进行移动,分析程序可知,在“产生随机数”命令按钮的事件代码里面,生成的随机数保存在数组a当中。在“移动数据”命令按钮的事件代码里面,调用过程.MoveArray对数组数据进行移动。MoveArray过程通过一个嵌套的循环来移动数组数据,移动的方法是每次取出第一个数据,然后把后面的数据往前移动,再把取出来的第一个数据放到最后,如此完成一个数据的移动。第一个“?”处是补充函数调用的参数,MoveArray过程有两个参数,第一个参数是数组,第二个参数是Integer类型参数,表示把前面多少个数据移动到后面,即第二个参数为m:第二个“?”处是补充循环的结束条件,内层循环是从把数据往前面移动,因此外层循环是控制前面移出多少个数据,即循环的次数由入参m决定;第三个“?”处的循环把数据从后往前移,即把后面的一个数据赋值给前面一个,完成一格移动;最后一个“?”处是把取出来的a(1)放到最后一个元素位置。
转载请注明原文地址:https://kaotiyun.com/show/LhGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在下列文件系统控件的事件中,当文件列表框的Path属性改变时发生的事件是______。
改变驱动器列表框的Drive属性值将激活______事件。
在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1D
假定有一个菜单项,名为Menultem,为了在运行时使该菜单项失效(变灰),应使用的语句为
如果一个变量未经定义就直接使用,则该变量的类型为()。
在程序运行时,可以通过______方法来移动滚动条的位置。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: PrivateSubCommand1_Click() n=Val(Text1.Text) Fori=2Ton Forj
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Tex
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
随机试题
假设有甲、乙、丙、丁、戊五种品牌,某消费者群忠诚于甲、甲、乙、乙、甲、乙等品牌,则这类消费者群属于()
A、腹股沟管的外环B、腹股沟管的后壁;C、腹股沟管的上壁;D、腹股沟管的下壁E、腹股沟管的内环腹膜和腹横筋膜_______;
女性,25岁。3天来感心悸伴胸闷,活动后明显,时有阵发性胸痛,呈针刺样,体力下降。3周前有上感发热、咽痛史,既往体健。查体:T37.2℃,P120次/分,R18次/分,BP100/70mmHg,平卧位,颈静脉无怒张,甲状腺Ⅰ度肿大,双肺底可闻及散在湿啰音,
对一些因特殊原因,如暴力、歧视等造成的流浪儿童,救助机构和社会工作者要坚持(),切实为儿童创造安全和健康的生活环境。
在市场经济中,价格的高低决定着生产者之间经济利益的分配,竞争力强的企业获得的利润多,而竞争力弱的企业则获得的利润少。这是市场经济的()。
关于do循环体while(条件表达式);以下叙述中正确的是
A、 B、 C、 C
A、Setupyourphonelist.B、Cancelalltheappointments.C、Haveyourlunchathome.D、Layoutyourclothes.D句(6)中,艾米在提到获得自我时间的方
(1)WhenKellyDilworthappliedforaDiscovercardinJuly,shewashappytolearnthatherspendinglimitwas$13,000—alevel
Formanyyears,womeninthemilitaryservedmostlyasnurses.Today,theydomanyotherkindsofworkaswell.Womenhavereach
最新回复
(
0
)