| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 639 人关注过本帖
标题:最低级的问题最大化事件如果获取?
只看楼主 加入收藏
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
结帖率:100%
收藏
 问题点数:0 回复次数:8 
最低级的问题最大化事件如果获取?

不好意思啦,有5、6年没用VB了,大多东东都忘光光了。
这个最大化事件是如何获取的啊?
就是一个窗口,默认值是自己设定的,但当有人点了最大化按钮后,如果不进行相应的调整界面会变得很难看,所以需要用这个事件来调整窗口里控件的位置,使它变得美观。
请问如何得到这个事件?恢复到默认值的事件又是什么呢?
谢谢了。

搜索更多相关主题的帖子: 最大化 获取 
2006-06-13 09:37
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 
晕,好象没人回答哎。
最好是有一个窗体大小变化的事件。不光光是最大化、恢复默认的变化。
就是拖动窗体大小时的事件。

2006-06-13 10:24
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
收藏
得分:0 
resize事件

快上课了……
2006-06-13 12:01
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 

事件调用不了,请举例说明一下,该如何用。谢谢!


2006-06-13 17:48
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 
人气什么不旺呢?

2006-06-14 08:27
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

Form_Resize事件里读一下Me.WindowState

Option Explicit

Private Sub Form_Resize()
If Me.WindowState = 2 Then
MsgBox "我被最大化了"
End If
End Sub


天津网站建设 http://www./
2006-06-14 09:11
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 
十分感谢!

2006-06-14 10:47
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 

因为你给我的方法,我找到了这个:
Private Sub Form_Resize()
If Me.Moveable Then
MsgBox "我被改变了"
End If
End Sub

我的要求用这个最好了,无论窗体什么变化,都可以触发.
再一次感谢!
以前会用的,只是多年未用,真的忘光光了.

[此贴子已经被作者于2006-6-14 10:59:38编辑过]


2006-06-14 10:58
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 

Private Sub Form_Resize()
If Me.Moveable Then
yy = Form1.Height
xx = Form1.Width
Label1.Left = (xx - Label1.Width) / 2
Label1.Top = (yy - Label1.Height) / 2
End If
End Sub
这个labell永远都在最中心了.无论你什么改变窗口
谢谢各位的帮助!


2006-06-14 11:27
快速回复:最低级的问题最大化事件如果获取?
数据加载中...
 
   



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

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