请问各位大虾,在vb2005中怎么实现下面图的功能(例如程序主窗体上有一"退出"按钮,单击后就弹出此对话框,当用户单击"确定"就退出整个系统,单击"取消"就不退出)???谢谢了

[IMG]C:\Documents and Settings\sq.A6598B4F9A26477\桌面\1.jpg[/IMG]

Dim x As Integer
x = MsgBox("你确认要退出吗?", MsgBoxStyle.OkCancel Or MsgBoxStyle.Critical, "确认退出?")
If x = 1 Then
Me.Close()
End If
End Sub


是要实现这个功能吗?

' 根据msgbox的返回值，来做条件判断 如果按"确定"，x=1 按“取消” x=2

图片看不到，是窗体还是网页？

看不到圖片！
你可以判斷以下啊 ！
If MsgBox("是否退出？", MsgBoxStyle.Question + MsgBoxStyle.YesNo + MsgBoxStyle.DefaultButton2, "System Message") = MsgBoxResult.No Then
Exit Sub
else
end '或者 application.exit()
end if

呵呵,不好意思,是窗体.....

5楼的方法
用application.exit()比较好

Querry_Unload

里加上判断

ok,就用5楼的试试先,谢谢各位的回复了.谢谢..-

各位,不好意思,再继续问一下,vb 2005中主窗体退出过程应该是form1_fromclose吧?   如果是的话,我把5楼的代码放进这个过程中,点"否"时,还是会退出系统,请问是什么原因呢?这个与vb 6.0不知同不同?