VB程序设计电子教案第2章：窗体程序设计

《VB程序设计电子教案第2章：窗体程序设计》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第2章窗体程序设计窗体相关概念单窗体程序设计多窗体程序设计本章学习目标掌握窗体的基本属性、事件和方法的使用掌握多窗体程序设计的基本方法，尤其是启动窗体的设置，以及通过程序来控制窗体的加载、显示、隐藏、关闭等窗体相关概念窗体的属性基本外观属性其它基本属性BackcolorBorderStylEnabledFontForeColorTop、LeftHeight、WidthMoveablePictureVisibleWindowState窗体的事件Load/UnLoadActivate/DeactivateInitiali

2、zeClick/DblClickResize窗体的方法Cls；Show；Hide；Move；Refresh与画图、文本有关的方法：Circle、Line、Point、TextHeight、TextWidth等单窗体程序设计基本方法①建立／编辑工程；②在窗体上放置所需控件；③设置窗体的相关属性以及各控件的相关属性；④编写相关控件对象的事件代码；⑤保存工程并运行。窗体事件的发生顺序首先发生Initialize事件，可用该事件初始化窗体所需的数据；然后窗体被装载，触发Load事件；当窗体获得焦点成为活动对象时，Activa

3、te在GotFocus之前发生；运行期间如果窗体的大小发生改变则触发Resize事件，随后发生Paint事件；窗体失去焦点时，LostFocus事件在Deactivate事件之前发生，如果窗体从内存中删除，则触发Unload事件；窗体的其它一些事件，如鼠标事件、键盘事件根据用户触发而发生，与上述事件没有必然联系。单窗体程序设计实例【实例2-1】程序运行开始时，窗体为整个屏幕的80%，且居屏幕中央，内含有一背景图；以后每单击窗体一次，窗体便便开始缩小直到窗体的高或宽小于500Twip时便再增大到原样大小。主要参考代码P

4、rivateSubForm_Load()Form1.Width=Screen.Width*0.8Form1.Height=Screen.Height*0.8Form1.Left=Screen.Width*0.1Form1.Top=Screen.Height*0.1EndSubPrivateSubForm_Click()Form1.Width=Form1.Width-100Form1.Height=Form1.Height-100IfForm1.Width<500OrForm1.Height<500ThenForm1.

5、Width=Screen.Width*0.8:Form1.Height=Screen.Height*0.8EndIfEndSub【思考题2-1】请读者考虑如何实现窗体在屏幕上的移动，且移到一定位置后便不再移动。窗体在屏幕上的移动可通过两种方法实现：每次有规律地改变窗体的Left和Top属性，或者直接调用窗体的Move方法。多窗体程序设计与多窗体有关的操作添加窗体；切换窗体；删除窗体；设置启动窗体；与多窗体有关的语句和方法Load语句Show方法Unload语句Hide方法多窗体程序设计实例【实例2-2】编写一含有三个

6、窗体（窗体名分别为form1,form2,form3）的应用程序，刚运行时，form3为默认启动窗体，且最大化，form2为最小化状态，form1为隐藏状态，单击form3中的命令按钮“显示form1”后即可显示窗体Form1，并关闭其余二个窗体。参考代码PrivateSubCommand1_Click()Form1.Show‘显示Form1UnloadForm2‘关闭Form2，即从内存中清除Form2UnloadForm3‘关闭Form3，即从内存中清除Form3EndSubPrivateSubForm_Load

7、()Form1.Visible=False‘运行初始窗体Form1不可见Form2.WindowState=1‘窗体Form2为最小化状态Form3.WindowState=2‘窗体Form3为最大化状态Form2.Show‘显示窗体Form2EndSub