vb教程面向对象编程基础

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,Visual Basic程序设计,第二章 面向对象编程基础,本章内容：,对象,控件的属性和方法,控件的事件,程序设计步骤,本章重点：,VB控件的属性、方法和事件,本章难点：,类、对象、属性、事件、方法的概念,2.1 对象和控件,一、对象、类的概念,1. 对象,对象是具有特殊属性（数据）和行为方式（方法）的实体，,如窗体、各种控件等。,类是一个抽象的概念，是用来创建对象的模板，它包括所创建对象的状态描述和方法定义，而对象只是类的一个实例。,2. 常用的对象类型,窗体,控件,数据库,外部程序提供的对象,自定义对象：由,自定义类产生的对象,VB中的控件,内部标准控件,VB工具箱中列出的控件，如文本框、命令按钮等。,ActiveX控件,对标准控件的扩充，不自动显示在工具箱中，使用时进行加载。一般以扩展名为.ocx的文件独立存在。,如通用对话框、多媒体控件等。,给对象命名,对象名称在同一作用域内必须保证唯一性。,窗体或控件对象在设计时VB会自动提供一个缺省的名称。,对象名称在属性窗口中的“名称”栏指定。,对象命名最好表示数据的含义，并加一个前缀来表示对象的类型。如：,frmMain、cmdOpen、textAddress,等。,描述对象的三个基本要素,属性、事件和方法,是描述对象的三个基本要素,对象有不同的特征，特征就是属性。每种属性有属性名称和特定对象的属性值。,名称,Name,属性,即属性窗口中的“,名称,” 。唯一标识该控件，所有控件都有此属性,2. Height, Width, Left, Top,属性,Left,：,返回或设置控件左边与其容器左边之间的距离,Top：,返回或设置控件顶部与其容器顶边之间的距离,Width：,返回或设置控件的宽度,Height：,返回或设置控件的高度,注意：,这里所指的都是相对于容器的坐标，而不是屏幕的绝对坐标,单位为,twip,(缇),：,1 twip=1/20点=1/1440英寸=1/567cm,控件的通用属性,3. ForeColor、BackColor和Font,属性,ForeColor,：,返回或设置在控件内显示的图片和文本的前景颜色,BackColor,：,返回或设置控件的背景颜色,Font,：,返回或设置控件的文字字体,程序中设置颜色，有两种方法,使用颜色常量,：,vbBlack,vbBlue,vbGreen,，,VbRed,，,vbWhite,，,VbYellow,，,vbcyan,(,青色,),，,vbMagenta,(,紫红色,),form1.BackColor =,vbBlue,使用,RGB,（,R,G,B,）函数。红、绿、蓝取值在,0,255,，如黄色为（,255,，,255,，,0),form1.BackColor = RGB(255,0,0),控件的通用属性,多个与字体有关的控件属性,FontName,（字体名）,Form1.FontName = “,黑体”,FontSize,（字体大小）,Form1.FontSize = 24,FontBold,（是否加粗）,Form1.FontBold = True,FontItalic,（是否斜体）,、,FontUnderline,（是否加下划线）、,FontStrikethru,（是否加删除线）,Font,属性,是一个对象类型,，字体的各种定义也可由该对象的不同属性来控制，如：,Form1.Font.Name = “,黑体”,Form1.Font.Size=12,Form1.Font.Bold = True,控件的通用属性,4. 控件的值,与控件的值有关的属性大致有三个：,Caption,返回或设置窗体和控件的标题,Frame,Label,OptionButton,CommandButton,CheckBox,Data,等控件有此属性。,Text(,待讲,),Textbox,List,ComboBox,等控件使用该属性设置控件的动态文本。通常有,Text,属性时，也会有,SelText,SelStart,SelLength,属性,。,Value,(,待讲,),CommandButton,CheckBox,和,OptionButton,控件使用该属性记录控件的状态。,控件的通用属性,5. 控件可用与可见,Enabled,返回或设置控件是否可用，取值为,True,（可用）,或,False,Command1.Enabled = False,Visible,返回或设置控件是否可见，取值为,True,（可见）,或,False,Command1.Visible = False,6.,控件输入的顺序,(,待讲,),TabIndex,：设置,Tab,键的顺序，该属性决定控件在一个窗体中的输入顺序，取值为整型。,TabStop,：,设该值决定是否可以通过,TAB,键将焦点从上一个焦点移动当前控件。取值为,True,（可以移动焦点）,或,False,控件的通用属性,方法就是可以对对象执行的操作。它是系统提供的一种特殊函数或过程，用于完成某种特定功能。,比如窗体可以移动，就是一个,move,方法，如何移动，就是该方法的参数,。,事实上，方法就好比一个函数或过程。,方法的使用形式:,对象.方法 参数,Move,方法：,移动控件，或改变控件大小,对象名,.Move,Left ,Top ,Width ,Height,举例：,form1.move 0, 0 ,移动窗体到屏幕左上角,Command1.move 0,0,2000,1000,SetFocus,方法：,使控件获得焦点。,如果控件无效或不可见，使用该方法会出错。,一般通过窗体的,Activate,事件设置焦点。,举例：,Text1.setfocus,控件的方法,事 件,：预先定义好的、能够被对象识别的动作。,事件过程,：为响应特定事件而执行的指令，是窗体的代码部分。,事件过程的一般格式如下：,Private Sub 对象名称_事件名称（）,事件响应程序代码,End sub,控件的事件,Click :,单击事件,DblClick,：,双击事件,KeyPress,(,参数,),：,按下一个对应某,ASCII,字符的键时,触发该事件。控制键中只能识别：,Enter,、,Tab,、,Space,、,Backspace,等。,Private Sub Text1_KeyPress(KeyAscii As Integer),print,KeyAscii,End Sub,KeyDown,（参数）,和,KeyUP,（参数）,键盘中任意键只要按下，就产生,KeyDown,事件，松开时产生,KeyUp,事件，有键值和控制键状态两个参数。,Change,事件,当控件的的值发生改变时会引发该事件，包括文本框、组合列表框、滚动条、驱动器和目录列表等。,VB控件通用事件,VB控件通用事件,6. MouseMove（参数）,当鼠标在控件上移动时，引发该事件,7. MouseDown （参数）和MouseUP （参数）,鼠标任何键按下和松开会产生MouseDown和MouseUp事件,8. GotFocus和LostFocus,当控件接受到输入焦点时，引发GotFocus事件,当控件失去输入焦点时，引发LostFocus事件,举例：设置文本框Text1的GotFoucus事件，当Text1获得焦点时，自动清空,Private Sub Text1_GotFocus(),Text1.Text = ,End Sub,2.4 程序设计步骤,分析问题，确定程序要完成什么任务，按下面的步骤创建应用程序：,（1）新建工程（创建一个应用程序首先要打开一个新的工程）,（2）在该工程中添加窗体，设计界面,（3）编写代码,（4）程序运行与调试（重复2、3步）,（5）编译程序，产生程序最后的EXE执行文件,（6）生成安装包,（外接程序外接程序管理器打包和展开向导选中“加载” 后“确定” 。或者直接利用VB中文版工具中的“Package & Deployment向导“）,程序举例:,欢迎界面,求圆的面积,课后作业,完成课后的作业,编写“求圆的面积”的VB程序,并编译成EXE文件,