| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 534 人关注过本帖
标题:[求助]窗体最小化
只看楼主 加入收藏
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
结帖率:100%
收藏
 问题点数:0 回复次数:9 
[求助]窗体最小化

这个是关闭出发的事件
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

End Sub
那最小化出发的事件是那个呢?谢谢指教!

搜索更多相关主题的帖子: 窗体 Integer Sub Form 
2007-05-07 10:18
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
收藏
得分:0 
resize

快上课了……
2007-05-07 10:32
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
   这个不行呀 ,,,这个事件 虽然最小化会触发事件 但是 ....最大化`和移动等等所有改变窗体也会触发这个事件 我要的 只是最小化时会触发

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-05-07 10:37
西山居士
Rank: 4
等 级:贵宾
威 望:11
帖 子:581
专家分:0
注 册:2007-4-21
收藏
得分:0 
最小化没有单独事件,
Form_Resize()事件的激发条件是当窗体的大小有变化时发生。当然最小化时是会触发的。

2007-05-07 10:40
西山居士
Rank: 4
等 级:贵宾
威 望:11
帖 子:581
专家分:0
注 册:2007-4-21
收藏
得分:0 
不知道你要做什么呢?不仿换个思路,比如自己做个最小化按钮,在点击事件中写你要触发的事件?

2007-05-07 10:45
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 

呵呵 就是不想自己做最小化按狃 想来请教一下 看来还是没办法了 呵呵 谢谢指点


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-05-07 10:50
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
收藏
得分:0 
Private Sub Form_Resize()
If Me.WindowState = vbMinimized Then
Debug.Print "最小化了"
End If
End Sub

VB QQ群:47715789
2007-05-07 10:58
西山居士
Rank: 4
等 级:贵宾
威 望:11
帖 子:581
专家分:0
注 册:2007-4-21
收藏
得分:0 
照楼上方法可以,判断最小化了再……

2007-05-07 11:10
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
谢谢啦~~~我已经用PS做了 最小化按狃了

[此贴子已经被作者于2007-5-7 11:22:07编辑过]



If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-05-07 11:21
jaychang
Rank: 1
等 级:禁止访问
帖 子:148
专家分:0
注 册:2007-5-3
收藏
得分:0 

自己做出来的还要好看些....

先判断这个思路当然也可以


http://bbs.    编程GIS论坛
交流软件开发技术与GIS技术
2007-05-07 12:38
快速回复:[求助]窗体最小化
数据加载中...
 
   



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

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