注意:考生不得修改窗体文件中已经存在的程序,最后程序按原文件名存盘。 [题目提供的源程序] Form1的源程序: Private Sub mnuOper_Click(Index As Integer) Select Case (1) Case 1 Form2.Show Form1.Hide Case 2 Timer1.Enabled= (2) Case 3 End End Select End Sub Private Sub Timer1_Timer() Picture1.Left=Picture1.Left+100 If Picture1.Left+Picture1.Width>= (3) Then Picture1.Left= (4) End If End Sub Form2的源程序: Private Sub Command1_Click() Form1.Show Form2.Hide End Sub