Question

急问：VB6.0如何实现三个窗体交替轮流出现：建立Form1，Form2，Form3.在Form1里面有一个开始按钮，

点击开始按钮开始显示Form1. 显示的时候都是最大化显示。要求Form1显示5秒后Form2再显示5秒然后Form3再显示5秒，如此循环显示。

Answer 1

Private Sub Command1_Click()
Timer1.Enabled = True

End Sub

Private Sub Form_Load()
Timer1.Interval = 2000
Timer1.Enabled = False
Form2.Visible = False
Form3.Visible = False

End Sub

Private Sub Timer1_Timer()
Static n As Byte
If n = 2 Then
Form3.Visible = False
Form1.Visible = True
n = 0
Exit Sub
End If

Forms(n).Visible = False
Forms(n + 1).Visible = True
n = n + 1

End Sub

追问

如果Form1显示10秒，然后Form2显示5秒，再然后Form3显示15秒，这么循环显示。怎么实现？

追答

你可以用三个定时器来实现。

Answer 2

追问

具体代码呢？如果Form1显示10秒，然后Form2显示5秒，再然后Form3显示15秒，这么循环显示。怎么实现？谢谢。