标题:[求助]遇到这种问题,关于两个form的程序
取消只看楼主
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
 问题点数:0 回复次数:5 
[求助]遇到这种问题,关于两个form的程序
Form1是主启动程序。Form2只是用来显示Form1程序中的计算结果的;启动的时候Form2也会运行,它的visible=true。但是在Form1上我并没有放置“退出”的按钮。只是用form1右上角的叉叉来退出,但是这样以来,Form1是退出了,但是Form2没有退出。Form1都退出了,Form2就没有意义了。那么请问,如何让Form1退出的时候Form2也同时退出?

谢谢各位高手!
搜索更多相关主题的帖子: form 
2006-12-30 10:38
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
得分:0 
在Unload里..写End??
purana,能不能讲的再详细点,你是说在Form1上放上一个“专职” 退出的button吗?
另外,退出按钮下的代码怎么写?汗。。。。
2006-12-30 11:08
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
得分:0 

还是不行,加入了
private sub form1_unload()
unload form2
end sub
但是按了form1右上角的叉之后,form2还是不消失。
如果不加上述代码,在form1上加了一个“退出”按钮,代码写:End 点击之后,form1和form2就都消失了。
但是我实在不想放这样一个按钮。form1的版面太紧张,按钮没地方放。

[此贴子已经被作者于2006-12-30 12:36:02编辑过]

2006-12-30 11:39
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
得分:0 
我还搞不清除,点击右上角那个叉叉,运行的是什么代码?
请指点。

[此贴子已经被作者于2006-12-30 12:34:50编辑过]

2006-12-30 12:03
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
得分:0 

我需要的功能很简单:
点击form1右上角的叉叉之后,form1 和form2都关闭(在内存中退出)
在form1中放一个button,代码为End,这样是可以的,但是使用这个程序的人还是习惯性的点击form1右上角的叉叉。所以我不想放这个button,而且form1的版面紧张,也放不下。

这还真不好办呢?大家给点建议吧。
还有一个奇怪的问题:
Private Sub form_unload()
Unload Form1
Unload frmSplash
End Sub
运行总出现错误“过程的声明与同名事件或过程的描述不匹配”,是不是unload的方法定义错误?
Private Sub form_load()
End Sub
这个是没有问题的,奇怪了?

2006-12-30 14:06
gcwen
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-11-6
得分:0 
问题终于解决了,在form1的代码中加入一下代码就好了。
Private Sub form_unload(cancel As Integer)
Unload Form1
Unload frmSplash
End Sub
或者
Private Sub form_unload(cancel As Integer)
End
End Sub

一直没有调试出来是因为unload的方法定义错误,少了后面的参数(cancel As Integer)。谢谢大家,--学习VB才2天(学两天就这么强!佩服!)

[此贴子已经被作者于2006-12-30 14:13:07编辑过]

2006-12-30 14:12



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-113125-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.012750 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved