多窗体与多文档.pptxVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
;1.1 多重窗体和多文档界面介绍; ⑵多文档 多文档界面是由父窗口及其所属的子窗口构成。在多文档界面中,窗口之间是有明确的从属关系的,子窗口以层叠形式显示在父窗口之内,或以平铺形式显示在父窗口之内,并且只能在父窗口中活动,子窗体随着父窗体的消失而消失。 多文档界面主要特性: ①所有子窗体均显示在MDI窗体的工作区中。用户可改变、移动窗体的大小,但被限在MDI窗体中。 ②当最小化子窗体时。它的图标将显示于MDI窗体上而不是在任务栏中。当最小化MDI窗体时??所有的子窗体也被最小化。只有MDI窗体的图标出现在任务栏中。;多文档界面;1.2 建立多重窗体和多文档界面 ; ⑴建立多重窗体的方法:添加多重窗体与普通窗体的添加方法相同。 ⑵多文档界面(MDI) 的建立步骤: ①添加MDI窗体(即多文档界面中的父窗体)。过程是:选择[工程菜单]→选择[添加MDI窗体]。 ②添加各个子窗体。具体步骤是:按添加普通窗体的方法添加窗体 →把新添加的窗体的MDIChild属性设置True (如果要解除某个窗体与MDI窗体之间的“父子关系”,则把窗体的MDIChild属性设置为False即可 ) 。;;多文档界面(MDI);1.3 多重窗体应用程序 ; 如果设计时把第一个添加到工程中的窗体删除了且你没有对启动对象进行设置或修改,则Visual Basic把Sub Main作为启动对象。 Sub Main过程是一个子过程,必须位于标准模块中,而不能位于窗体模块内,如果Sub Main作为启动对象,则在过程必须有显示某个存在窗体的语句,但可以在显示窗体前根据程序的需要、通过程序代码对显示窗体进行选择。 必须为程序设置好启动对象,程序才可以正常的启动和运行,没有启动对象的程序是不能执行的,启动对象设置不合理的程序也是不能执行的。 ;设置启动窗体界面;1.3.2 Show方法 ;1.3.3 Hide方法 ;1.3.4 UnLoad和Load语句 ; 窗体是以文件形式保存在硬盘中的,如果使用,则必须加载到内存中来。窗体加载到内存中后,才可以使用窗体的控件、对象的属性。把窗体加载到内存使用Load语句,其语法格式为: Load 窗体名称 Load语句仅仅是把窗体加载到内存中,并不包括显示窗体的功能,若需要显示窗体,应使用Show方法。 Load语句与Show方法的区别: Load语句仅仅是把窗体加载到内存中,但不显示窗体。 Show方法是当窗体没有加载到内存中时,先加载窗体到内存,然后显示窗体;若窗体已经加载到内存中,则直接将窗体在屏幕上显示来。 ;1.3.5 结束应用程序 ; 例题1:设计一个由三个窗体组成的应用程序,进行学生成绩的统计。其中三个窗体的界面如图所示,在第一个窗体中输入学生姓名,在第二个窗体中输入学生成绩,在第三个窗体中用Print方法输出学生的姓名和总成绩。; ⑴按照题目要求依次建立三个窗体; ⑵编写程序代码 。 ①第一个窗体(“输入姓名”窗体)的代码清单为: Public StrName As String Private Sub CmdOK_Click() StrName = Trim(TxtName.Text) 把输入的姓名用一个变量保存下来 Me.Hide 隐藏自己,但自己仍然在内存中 FrmInScore.Show 0 以非模态方式显示第二个窗体 End Sub Private Sub CmdQuit_Click() End 直接立即结束程序 End Sub; ②第二个窗体(“输入成绩”窗体)的代码清单为: Public SumScore As Double Private Sub CmdOK_Click() SumScore = Val(TxtCH.Text) + Val(TxtMt.Text) 把成绩用一个变更保存起来 Me.Hide 隐藏自己 FrmOutput.Show 0 以非模态方式显示第三个窗体 FrmOutput.Print 在第三个窗体上输出一个空白行 FrmOutput.Print FrmInName.StrName + 的成绩为: + _ Str(FrmInScore.SumScore) 在第三个窗体上输出结果 End Sub Private Sub CmdQuit_Click() End 直接立即结束程序 End Sub; ③第三个窗体(“输出结果”窗体)的代码清单为: Private Sub CmdOK_Click() M

文档评论(0)

151****7975 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档