如何判断一个窗体正被用户拖大呢?谢谢

chzzj 2003-10-18 10:41:38
如何判断一个窗体正被用户拖大?
...全文
47 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
chzzj 2003-10-19
  • 打赏
  • 举报
回复
这样重新被赋值就有道理了,学习
hisofty 2003-10-19
  • 打赏
  • 举报
回复
resize事件也就是对wm_size(wm_sizing??)的封装
rainstormmaster 2003-10-18
  • 打赏
  • 举报
回复
不确切,应该这样:

Dim w As Long
Dim h As Long

Private Sub Form_Load()
w = Me.Width
h = Me.Height
End Sub

Private Sub Form_Resize()
If Me.Width > w And Me.Height >= h Then
Debug.Print "放大"
ElseIf Me.Width >= w And Me.Height > h Then
Debug.Print "放大"
ElseIf Me.Width < w And Me.Height <= h Then
Debug.Print "缩小"
ElseIf Me.Width <= w And Me.Height < h Then
Debug.Print "缩小"
End If
w = Me.Width
h = Me.Height
End Sub
rainstormmaster 2003-10-18
  • 打赏
  • 举报
回复
处理窗体的resize事件

比较窗体目前的长度、宽度和载入时的长度、宽度
大家好,2009年9月份注册以来,在论坛上学到了许多东西,得得许多会员和版主及管理的帮助和关爱,真的很感谢大家,是因为,是因为大家都是无私且乐于助人,分享自己的宝贵的技术和心得,且使我对EXCEL充满着激情,在我的脑海里总是浮现: 1. 我是ExcelHome论坛的会员,我很荣幸 2. 工作空余时间我会情不自禁来到ExcelHome之家,看看家,学习一些别人的的心得与帮助一些新会员 3. 那里有太多太多的宝贝,有意外的收获和惊喜(众里寻“她”千百度;踏破铁鞋无觅处,在EH得来全不费功夫) 4. 遇到问题我会在论坛和百度找,再找不到我就会发贴提问。呵呵,这里一定会得到帮助的 是因为这些,因为大家的无私,所以我也不能自私,呵呵,分享一下打造“自己2010选项卡”,2010选项卡的修改比2003版的菜单修改复杂了,希望能帮到一些对这方面感兴趣的朋友,由于水平够,里面有许多不足,欢迎大家指 ,呵呵,我八婆了一大堆,进入主题 对于Excel2007和2010,你注意到的第一件事可能就是它新外观,沿用多年的菜单与工具栏的用户界面已被抛弃了,取而代之的是选项卡和功能区的新界面,现在我们一步步来制作一个自己的选项卡(首先申明,有些代码和方法来自ExcelHome论坛和网络,在这里谢谢这些提供代码的朋友 ,俗话说的好“前人载树,后人乘凉”,并非个人所写) 第一步:在桌面上创建一个名为customUI的文件夹 第二步:步骤2 打开记事本,在其中复制下面的XML代码:文件名为CustomUI.xml,编码为UTF-8 保存到桌面customUI文件夹中

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧