Question

vb编程点出一个窗口可以在出现以窗口 这样无限循环 代码怎么写

Answer 1

DO回车 msgbox "呵呵",""回车 loop

Answer 2

Private Sub Form_Load() While True Dim frm As New Form1 frm.Show WendEnd Sub

Answer 3

窗口？
建两个form 分别为form1 和form2
分别在两个form上 放上timer 。
timer的inver设为500
form1和form2的formload事件中加入如下代码：
timer1.enable=true
然后在timer timer事件中加入如下代码：
form2.show
unload form1
和form1.show
unload form2