VB消息框弹出问题。

VB写的程序，点击退出按钮时，弹出消息框。按理说弹出的消息框应该在窗口的前面，可是为什么一弹出消息框，窗口就消失不见？向大家请教。

小马小蛇，我的VB是从网上下的，你的意思是它不行了？

这个消息框叫做message，是用来弹出程序运行时候的一些提示信息，也可以作为信息输入，而你的那个用来确认退出实际是作为信息输入的，可以这样写：
（这是点击程序右上角关闭程序时用的）
Private Sub Form_Unload(Cancel As Integer)

If MsgBox("确认退出吗?", vbYesNo + vbQuestion) = vbYes Then
Unload Me
Else
Cancel = 1
End If
End Sub

（点击“退出”命令按钮时退出可以这样写）
Private Sub Command3_Click() 'Command3_Click() 指的是“退出”，具体按照你自己的写
If MsgBox("确认退出吗?", vbYesNo + vbQuestion) = vbYes Then
End
End If
End Sub
希望你可以搞定。

if messagebox.show( "是否要退出？","提示" messageboxbutton.yesno).yes then

...

end if

if messagebox.show( "是否要退出？","提示" messageboxbutton.yesno).no then

...

end if

VB有问题，或者是你编的程序导致的，建议查看VB，很可能是这个出问题了

msgbox "消息框在所有窗体之前",1 256 4096,"紫灵园"

看上去是Cancel = 几的问题 记得要Cancel掉，否则程序unload了，你的msgbox当然也没了