如何使对方点击关闭（X）后不但不关闭反而又弹出一个窗口？

请高手帮帮我吧，谢谢大家了！

热心网友

在Form1代码中加如下代码能实现:Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)Cancel = -1Form2.ShowEnd Sub由于Form1窗体(X)无法关闭,故应在Form1或其它Form中设退出按钮或其它控件事件中写进END语句,不然编译生成EXE文件,运行将长驻内存.

热心网友

在form的queryunload时间里面把cancel属性设置为true，然后写你打开其他窗口的代码。