اولا يكون عندنا 2 timer
ثانيا نظبط خاصية enabled في تيمر واحد فقط على true
ليكون الكودفي timer1
Me.Width = Me.Width + 2
If Me.Width = 666 Then
Timer1.Enabled = False
Timer2.Enabled = True
'Form1.Show()
End If
اما في timre2
Me.Height = Me.Height + 1
If Me.Height = 205 Then
Timer2.Enabled = False
Form2.Show()
End If
No comments:
Post a Comment