注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

高占路 廊坊师范学院信息技术提高班十四期

新生,从这里开始。

 
 
 

日志

 
 

学生系统中的MDI窗体  

2017-05-13 17:53:37|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

MDIMultiple Document Interface的缩写,就是文档窗体的意思。它是和单文档SDI相对的。

1、一个工程中只能有一个MDI窗体(只能建立一个MDI窗体,建立不了第二个),它可以包括多个子窗体(普通的from窗体属性MDIchild的项改成True)。

2、MDIForm可做为Form的父窗体存在, 建立一个MDI后,将普通的窗体的MDIchild属性设为真(True),则该窗体就变成MDI的子窗体。所有子窗体都在父窗体中显示。

加载两个窗体,一个Form1,一个MDIForm1Form1MDIChild属性设为True再在MDIForm中加入如下代码:

Private Sub MDIForm_Load()
Form1.Show
End Sub

在一天系统中如果没有MDI窗体,但是把Form1窗体的MDIChild属性设为True,这时调用Form1窗体,程序就会报错如图

 学生系统中的MDI窗体 - 14期 高占路 - 高占路 廊坊师范学院信息技术提高班十四期

这时只要添加一个MDI窗体,问题就可解决了。

3、MDI窗体为主窗体,Form为子窗体,如何让Form窗体在MDI窗体的中央位置出现,可以用代码实现如

Private Sub Form_Resize()

On Error Resume Next

If Me.Width >= MDIForm1.ScaleWidth Then

Me.Width = MDIForm1.ScaleWidth

Me.Left = 0

Else

Me.Left = (MDIForm1.ScaleWidth - Me.Width) / 2

End If

If Me.Height >= MDIForm1.ScaleHeight Then

Me.Height = MDIForm1.ScaleHeight

Me.Top = 0

Else

Me.Top = (MDIForm1.ScaleHeight - Me.Height) / 2

End If

End Sub

  评论这张
 
阅读(31)| 评论(15)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017