- 1、本文档共15页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第11章 多窗体与多文档界面 沈阳理工大学应用技术学院 0. 本章内容 多窗体处理 VB工程结构 闲置循环与DoEvents语句 MDI窗体 MDI应用 1. 多窗体处理 与多窗体有关的语句和方法 Load语句:把一个窗体装入内存 格式:Load 窗体名称 Unload语句:清除内存中指定的窗体 格式:Unload 窗体名称 Show方法:用来显示一个窗体 格式:[窗体名称.]Show [模式] Hide方法:隐藏窗体不显示,但仍在内存中 格式:[窗体名称.]Hide 1. 多窗体处理 【例1】多窗体应用示例。 1. 多窗体处理 1. 多窗体处理 1. 多窗体处理 1. 多窗体处理 1. 多窗体处理 1. 多窗体处理 启动窗体的设置 通过“工程”菜单的“工程属性”指定 多窗体程序的存取 2. VB工程结构 应用程序通常包括3种模块 2. VB工程结构 Sub Main过程 程序一般从启动窗体的Form_Load过程开始执行 应用程序在运行时会先执行Sub Main过程 有时在程序启动时不加载任何窗体,而是首先执行一段程序代码,此时可把要执行的程序代码放在Sub Main过程中,并指定Sub Main为“启动对象”。 在一个工程中只能有一个Sub Main过程 设置Sub Main过程为“启动对象”的方法: 在“工程属性”对话框的“通用”选项卡中,从“启动对象”下拉列表框中选中“Sub Main” 3. 闲置循环与DoEvents语句 闲置循环 VB只有在发生事件时才执行相应的事件过程,如果没有事件发生,则应用程序处于“闲置”状态 闲置循环,就是当程序处于闲置状态时,用一个循环来执行某些操作 DoEvents语句 格式: [窗体号=]DoEvents[()] 功能:在闲置循环中,通过DoEvents语句可以把控制权交给系统去处理所发生的事件 3. 闲置循环与DoEvents语句 【例2】闲置循环和DoEvents应用示例。 3. 闲置循环与DoEvents语句 程序运行后,进入闲置循环,此时将在文本框Text1中不断地显示系统时间。 由于加入DoEvents函数,则可以在执行闲置循环过程中执行其他操作,如重设窗体的大小及最大化/最小化,还能响应命令按钮Command1和Command2的单击事件等。 当其他操作完成后,又会回到闲置循环中继续执行 * * * * * 1.创建3个窗体和1个标准模块 (1)主窗体(Form1) 本窗体上建立了“输入参数”(Command11)、“画圆”(Command12)和“结束”(Command13)三个命令按钮 设置为启动窗体 * (2)“输入参数”窗体(Form2) 在主窗体上单击了“输入参数”按钮后弹出的窗体,用于输入圆的坐标位置(x,y)和半径(r)。窗体上建立了3个文本框(Text21、Text22和Text23)和1个“返回”命令按钮(Command21) * (3)“画圆”窗体(Form3) 在主窗体上单击了“画圆”按钮后弹出的窗体。窗体上建立了1个图片框和2个命令按钮。用户可以单击“画圆”(Command31)命令按钮,使之按给定参数在图片框上画圆。 * (4)标准模块(Modulel) 由于在各窗体之间需要使用公共变量来传送数据,所以建立一个标准模块Modulel,对用到的全局变量X、Y和R进行声明 * Private Sub Command11_Click() 主窗体“输入参数”按钮 Form1.Hide 隐藏主窗体 Form2.Show 显示“输入参数”窗体 End Sub Private Sub Command12_Click() 主窗体“画圆”按钮 Form1.Hide 隐藏主窗体 Form3.Show 显示“画圆”窗体 End Sub Private Sub Command13_Click() 主窗体“结束”按钮 Unload Form1 Unload Form2 Unload Form3 End End Sub 2.编写程序代码 主窗体: * 输入参数: Private Sub Command21_Click() “输入参数”窗体的“返回”按钮 X = Val(Text21.Text) Y = Val(Text22.Text) r = Val(Text23.Text) Form2.Hide
文档评论(0)