2012年计算机二级VB考试试题及答案解析4
综合应用(1小题,计30分)
注意:下面出现的“考生文件夹”均为%USER%在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个图片框,名称为P1、 P2,分别用来表示信号灯和汽车,其中在P1中轮流装入“黄灯.ico”、“红灯.ico”、“绿灯.ico”文件来实现信号灯的切换;还有两个计时器 Timer1和Timer2,Timer1用于变换信号灯,黄灯1秒,红灯2秒,绿灯3秒;Timer2用于控制汽车向左移动。运行时,信号灯不断变换,单击“开车”按钮后。汽车开始移动,如果移动到信号灯前或信号灯下,遇到红灯或黄灯,则停止移动,当变为绿灯后再继续移动。
在窗体中已经给出了全部控件和程序,但程序不完整,要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件以原文件名存盘。
解题思路:
启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体文件名为sjt5.frm。
由于所提供的窗体程序不完整,在窗体的Private Sub C1_Click()事件过程中,有一处地方需要修改。
1) 将语句
’Timer2.Enabled = ?
改为
Timer2.Enabled = True
在窗体的Private Sub Timer1_Timer()事件过程中,有一处地方需要修改。
1) 将语句
’P1.Picture = LoadPicture("?")
改为
P1.Picture = LoadPicture("绿灯.ico")
在窗体的Private Sub Timer2_Timer()事件过程中,有二处地方需要修改。
1) 将语句
’Timer2.Enabled = ?
改为
Timer2.Enabled = False
2) 将语句
’P2.Move ? - 10, P2.Top, P2.Width, P2.Height
改为
P2.Move P2.Left - 10, P2.Top, P2.Width, P2.Height
参考文件:c:wexam26990001hlpsys参考答案sjt5.vbp、sjt5.frm、sjt5.frx、sjt5.vbw
请把这些文件复制到c:wexam26990001中,然后打开sjt5.vbp文件并运行。