如何连续弹出窗口

Question

举个例子，就是一个form1，一个按钮点击按钮后，连续弹出窗口

Answer 1

很简单，用一个循环dim oForm as Object
dim i     as Long
    
     set oForm = New Form1    '假若 Form1已经存在
     for i = 1 to N
         oForm.Show
     next不清楚楼主是否就是这个意思？
         

Answer 2

form1有一个command1,按下后弹出form2,1秒后再弹出form3
Private Sub Command1_Click()
Form2.Show
t1 = TimerDo While Timer < t1 + 1
DoEvents
LoopForm3.ShowEnd Sub

Answer 3

还不如一秒钟跳一msgbox 哈哈.

Answer 4

www.5ivb.net
www.21code.com
可能找的到代码