首页 > 职业考试题库1 > 题目详情
阅读以下说明和Visual Basic 码,将应填入(n)处的字名写在对应栏内
题目内容:
[试题]阅读以下说明和Visual Basic 码,将应填入(n)处的字名写在对应栏内[说明] 已有一个工程文件,窗体上有两个图片框,名称为P1,P2。分别用来表示信号灯合汽车,其中在P1中轮流装入“黄灯.ico”、“红灯.ico”、“绿灯.ico”文件来实现信号灯的切换;还有两个计时器 Timer1 和Timer2,Timer1 用于变换信号灯,黄灯1秒,红灯2秒,绿灯3秒;Timer2用于控制汽车向左移动。运动时,信号灯不断变换,单击“开车”按钮后,汽车开始移动,如果移动到信号灯前或信号灯下,遇到红灯或黄灯,则停止移动。下面是实现上述功能的程序,请填空。
Private Sub Timer41_ Timer()
a=a+1
If (1) Then
a=1
E.nd If
Select Case a
C.ase 1
P1. Picture = LoadPicture( “黄灯.ico” )
C.ase 2, 3
P1. Picture = LoadPicture( “红灯”.ico” )
C.ase4, 5, 6
P1. Picture = LeadPicture( “绿灯. ico” )(2)
E.nd Select
E.nd Sub
Private Sub Timer2_Timer( )
If (3) And (P2. Left > P1. Left And P2. Left < P1. Left + P1. Width) Or P2. Left < = 100 Then
Timer2. Enabled = False
E.lse(4)
E.nd If
E.nd Sub
本题链接: