Question

VB如何连续显示多个msgbox

在VB6.0中，按一个按钮只能弹出一个msgbox，我想它在不按msgbox的确定下连续弹出3个msgbox，需要怎么实现?

Answer 1

不可能，想要这样只能自己做窗口，form1 form2 form3 form4
form1里有个按钮 按下按钮的时候 可以一起弹出 form2.show form3.show form4.show
除此之外 别无它法。

Answer 2

For i = 1 To 3
Shell "mshta vbscript:msgbox(""第" & i & "个msgbox"")(close)"
Next i

Answer 3

您好，可以的
先写上

Function snd(msg$, Sound%)
Shell "mshta vbscript:msgbox(" & Chr(34) & msg & Chr(34) & "," & Sound + 4096 & ")(window.close)"
End Function
然后要调用的时候就不要用msgbox("msg",64)了，改用snd("msg",64)
望采纳，谢谢