VB程序设计电子教案第2章–窗体程序设计.ppt

VB程序设计电子教案第2章–窗体程序设计.ppt

  1. 1、本文档共14页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VB程序设计电子教案第2章–窗体程序设计

第2章 窗体程序设计 窗体相关概念 单窗体程序设计 多窗体程序设计 本章学习目标 掌握窗体的基本属性、事件和方法的使用 掌握多窗体程序设计的基本方法,尤其是启动窗体的设置,以及通过程序来控制窗体的加载、显示、隐藏、关闭等 窗体相关概念 窗体的属性 窗体的事件 Load/UnLoad Activate/Deactivate Initialize Click/DblClick Resize 窗体的方法 Cls ; Show; Hide; Move ; Refresh 与画图、文本有关的方法:Circle、Line、Point、TextHeight、TextWidth等 单窗体程序设计基本方法 ①建立/编辑工程; ②在窗体上放置所需控件; ③设置窗体的相关属性以及各控件的相关属性; ④编写相关控件对象的事件代码; ⑤保存工程并运行。 窗体事件的发生顺序 首先发生Initialize事件,可用该事件初始化窗体所需的数据; 然后窗体被装载,触发Load事件; 当窗体获得焦点成为活动对象时,Activate在GotFocus之前发生; 运行期间如果窗体的大小发生改变则触发Resize事件,随后发生Paint事件; 窗体失去焦点时,LostFocus事件在Deactivate事件之前发生,如果窗体从内存中删除,则触发Unload事件; 窗体的其它一些事件,如鼠标事件、键盘事件根据用户触发而发生,与上述事件没有必然联系。 单窗体程序设计实例 【实例2-1】 程序运行开始时,窗体为整个屏幕的80%,且居屏幕中央,内含有一背景图;以后每单击窗体一次,窗体便便开始缩小直到窗体的高或宽小于500Twip时便再增大到原样大小。 主要参考代码 【思考题2-1】请读者考虑如何实现窗体在屏幕上的移动,且移到一定位置后便不再移动。 窗体在屏幕上的移动可通过两种方法实现:每次有规律地改变窗体的Left和Top属性,或者直接调用窗体的Move方法。 多窗体程序设计 与多窗体有关的操作  添加窗体;  切换窗体;  删除窗体;  设置启动窗体; 与多窗体有关的语句和方法 Load语句 Show方法 Unload语句 Hide方法 多窗体程序设计实例 【实例2-2】编写一含有三个窗体(窗体名分别为form1,form2,form3)的应用程序,刚运行时,form3为默认启动窗体,且最大化,form2为最小化状态,form1为隐藏状态,单击form3中的命令按钮“显示form1”后即可显示窗体Form1,并关闭其余二个窗体。 参考代码 * * 基本外观属性 其它基本属性 Backcolor BorderStyl Enabled Font ForeColor Top、Left Height、Width Moveable Picture Visible WindowState Private Sub Form_Load() Form1.Width = Screen.Width * 0.8 Form1.Height = Screen.Height * 0.8 Form1.Left = Screen.Width * 0.1 Form1.Top = Screen.Height * 0.1  End Sub Private Sub Form_Click()  Form1.Width = Form1.Width - 100  Form1.Height = Form1.Height - 100  If Form1.Width 500 Or Form1.Height 500 Then   Form1.Width = Screen.Width * 0.8: Form1.Height = Screen.Height * 0.8   End If End Sub *

文档评论(0)

wuyoujun92 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档