更多"窗体上有两个图片框为Picture1和Picture2，当把Pictu"的相关试题:
[填空题][说明] 已有一个工程文件，窗体上有两个图片框，名称为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
End If
Select Case a
Case 1
P1. Picture = LoadPicture( “黄灯.ico” )
Case 2, 3
P1. Picture = LoadPicture( “红灯”.ico” )
Case4, 5, 6
P1. Picture = LeadPicture( “绿灯. ico” )
(2)
End Select
End 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
Else
(4)
End If
End Sub
[多项选择]在考生文件夹下有一个过程文件sjt5.vbp，窗体上有两个图片框，名称为P1、P2，分别用来表示信号灯和汽车，其中在P1中轮流装入“黄灯.ico”、“红灯.ico’、“绿灯.ico”文件来实现信号灯的切换；还有两个计时器Timer1和Timer2，Timer1用于变换信号灯，黄灯1秒，红灯2秒，绿灯3秒；Timer2用于控制汽车向左移动。运行时，信号灯不断变换。单击“车按”按钮后，汽车开始移动，如果移动到信号灯前或信号灯下，遇到红灯或黄灯，则停止移动，当变为绿灯后再继续移动。
在窗体中已经给出了全部控件和程序，但程序不完整，要求阅读程序并去掉程序中的注释符，把程序中的改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件以原文件名存盘。
sjt5.frm文件内容如下：
Dim a%,b As Boolean
Private Sub C1_Click（ ）
’ Timer2.Enabled=
b=True
End Sub
Private Sub Timer1_Timer（ ）
a=a+1
If a＞6 Then
a=1
End If
Select Case a
Case 1
P1.Picture=LoadPicture("黄灯.ico" )
Case 2,3
P1.Picture=LoadPicture("红灯.ico")
Case 4,5,6
’ P1.Picture=LoadPicture("")
If b Then Timer2.Enabled=True
End Select
End SubPrivate Sub Timer2_Timer（ ）
If (a＜4) And (P2.Left＞P1.Left And P2.Left＜P1.Left+P1.Width)
Or P2.Left＜=100 Then
’ Timer2.Enabled=
Else
’ P2.Move —10,P2.Top,P2.Width,
[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click( )
Text1.Text=“VB程序设计”
End Sub
PrivmeSubText1_Change（ ）
Picture1.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
[填空题]在窗体上绘制一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（ ）
Picturel.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 ______，而在图片框中显示的内容是 ______。
[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（ ）
Picture1.Print"VB programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内
容是 【8】 。
[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（ ）
Picturel.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是______。
[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（ ） Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change（ ） Picture1.Print "VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 _________，而在图片框中显示 的内容是 _________。
