| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1195 人关注过本帖
标题:最小化的问题
只看楼主 加入收藏
chen3bing
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:507
专家分:104
注 册:2008-11-12
结帖率:91.22%
收藏
已结贴  问题点数:10 回复次数:1 
最小化的问题
我设计了一个界面,是两个窗体拼成一个。
上面的是主窗体,点击最小化按钮,下面的窗体也最小化
代码如下:
Private Sub Form_Resize()
If WindowState = 1 Then
       If Form7_8_Flag = 7 Then Form7.WindowState = 1
       If Form7_8_Flag = 8 Then Form8.WindowState = 1
       If Form7_8_Flag = 9 Then Form9.WindowState = 1
       If Form7_8_Flag = 11 Then Form11.WindowState = 1
End If
If WindowState = 0 Then
       If Form7_8_Flag = 7 Then Form7.WindowState = 0
       If Form7_8_Flag = 8 Then Form8.WindowState = 0
       If Form7_8_Flag = 9 Then Form9.WindowState = 0
       If Form7_8_Flag = 11 Then Form11.WindowState = 0
End If

End Sub
设断点,运行可以。全速运行,下面的窗体不最小化。
请问高手,哪里的问题?谢谢!
搜索更多相关主题的帖子: Then 窗体 If End 最小化 
2020-04-23 15:48
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:10 
使用代码修改了窗口大小后,都要 写一个 DoEvents .

在VB里,操作分为慢速操作和正常操作。涉及图像操作的命令都是慢速操作,可以理解为VB会把绘图操作打包成一批操作,然后再按一定规律提交操作系统统一处理。
加上 DoEvents 后,就会把前面这些绘图操作发给操作系统,然后就可以检测到属性被修改了。

授人于鱼,不如授人于渔
早已停用QQ了
2020-04-23 16:53
快速回复:最小化的问题
数据加载中...
 
   



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

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