资源描述：
《VB应用程序设计过程》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、VisualBasic程序设计1第2章VB应用程序设计过程教学目的要求：理解面向对象程序设计方法,概念掌握常用基本控件及应用掌握VB工程开发设计步骤教学重点掌握常用基本控件属性、方法、事件面向对象程序设计方法教学难点：面向对象程序设计中对象、属性、方法、事件概念2传统结构化程序设计方法：从功能出发，研究程序执行过程。从第一行开始执行,并按照预定的路径执行,用户无法改变程序的流程面向对象的程序设计方法：从对象出发，研究对象属性,采用事件驱动。事件过程包含程序代码.2.1面向对象程序设计 一、程序设计方
2、法：例如:计算y=IxI（结构化设计过程）1、任意输入x值2、利用选择结构，判断x>=0或,x<03、如果x>=0,y=x;否则y=-x4、输出y值例如:计算y=IxI（面向对象设计过程）1、x输入对象，y输出对象2、设计窗体，其中x文本框，y标签和计算按钮3、在计算按钮单击事件中编写代码，完成计算。3对象是系统中的基本运行实体,是数据和操作的集合.理解：1.在VB环境中所涉及到的窗体、控件和菜单项等均为对象。2.对象是具有属性和行为的实体。建立对象后，用该对象的属性、事件和方法来描述。例如:现实生
3、活中的实体都可以看作对象,一本书,一个学生.VB中窗体,窗体中标签、文本框、按钮等.类是具有相同属性和操作的对象集合.一个对象就是类的一个实例。例如：学生张三是对象；所有学生是一个类。二、面向对象中常见概念4属性：对象的特性，不同的对象有不同的属性。如对象标题(Caption),名称(Name),颜色(Color),字体(Font),位置,大小等.属性设置：1、在属性窗口上设置（实际操作）2、在程序代码中用赋值语句设置：对象名．属性名=属性值例：窗体标题设置为：学生成绩管理系统.其中标签label1
4、:标题为“长春工程学院”,黑体,60点阵字.5在VB中，系统为每一对象预先定义好一系列的事件。每个事件执行程序代码的过程，称为事件过程。如常见的事件:单击(Click)双击(DblClick)装入事件(Load)改变事件(Change)鼠标移动事件(MouseMove)鼠标抬起事件(Mouseup)鼠标按下事件(Mousedown)获取焦点事件(GotFocus)事件是指发生在对象上的特定操作。事件过程的一般格式:PrivateSub<对象名>_<事件名>([<参数表>])<程序代码>EndSub6
5、如:窗体的打印方法(Print)、显示方法(Show)、隐藏方法(hide)清除方法(Cls)、移动方法(Move)等.方法调用格式:对象名.方法[参数名]方法是指对象本身能执行的动作。系统为不同对象提供的一种动作（系统函数，过程）,可供用户直接调用。PrivateSubForm_Activate()Print"欢迎使用VB6.0"EndSubPrivateSubCommand1_Click()Form2.ShowForm2.Print"向大家问好"EndSub如：设计两个窗体form1,form2
6、，先显示form1,输出“欢迎使用VB6,0”，单击按钮,再显示form2,输出“向大家问好”7一、窗体(Form)窗体是VB中最常见的对象,也是可视化程序设计的基础。各种控件对象必须建立在窗体上.窗体--”容器”1、窗体操作—建立、添加、删除建立新工程时，系统自动创建一窗体Form1；若要增加新窗口时，可在“工程”菜单中选择“添加窗体”项.2.2介绍窗体、命令按钮、标签、文本框的属性、事件和方法8一个工程中包含若干窗体,从“工程”菜单中选择“移除”命令92、窗体属性窗体的属性设置:通过属性窗口，也
7、可以在程序代码中设置。常用的窗体属性有：Name(名称)窗体名称(窗体文件名,扩展名为.frm).BackColor窗体的背景颜色.Caption标题栏显示的内容.ControlBox决定窗体是否具有控制菜单.Font窗体显示字体的属性(设置字体、字形、大小、效果).Forecolor窗体显示字体的颜色.MaxButton决定窗体是否有最大化按钮Ture，False.MinButton决定窗体是否具有最小化按钮.Moveable决定窗体是否能移动.Picture设置在窗体上显示的图片.10Windo
8、wState运行时窗体状态:正常、最小化、最大化Height、Width、Left、Top窗体高度、宽度、左边距、上边距Visible窗体运行是否可见Borderstyle窗体样式选择（边框等）代码中设置:Form1.caption=“计算窗口”Form1.FontName="黑体"Form1.FontSize=40Form1.FontBold=True是否粗体Form1.FontItalic=False是否斜体Form1.FontStrikethru=True是否加
