简单的VB程序设计1.ppt

第二章 简单的VB程序设计,本章要求：,1.理解面向对象程序设计的基本概念； 2.理解对象的属性、事件和方法等基本概念； 3.掌握设置属性的两种常用方法； 4.掌握建立简单的应用程序的方法和步骤； 5.掌握窗体和三个基本控件的使用方法。,对象是程序运行时的实体。 在VB中，构成图形用户界面（GUI）的每一个可视部件，均称为对象，如窗体、文本框、命令按钮等。 VB中的对象分两类： 预定义对象（分窗体对象和控件对象两种） 用户自己定义建立的对象（非计算机专业不学） VB中所使用的控件对象分三类： 内部控件、ActiveX控件和可插入对象。 对象的三个要素： 对象的属性、事件和方法。,2.1 对象的概念 1. 对象,类是一个抽象的整体概念 ，对象是类的实例化。 类与对象是面向对象程序设计语言的基础。 例如：汽车是一个笼统的名称，是整体概念，我们把汽车看成一个“类”。一辆辆具体的汽车（比如你的汽车）就是这个类的实例，也就是属于这个类的对象。 VB中的类可分为两种： 系统类是系统直接提供的现成类，如窗体类、 命令按钮类和文本框类等等； 自定义类是由用户自己设计定义的。 还有大量的由第三方开发的自定义类可供参考。,2. 类,工具箱中的各种控件代表了各个不同的类。通过类的实例化，可以得到真正的对象。当在窗体上画一个控件时，就将类转换为对象，即创建了一个控件对象，也简称为控件。,3. 工具箱中的类及其应用,（1）对象的建立 方法一： 单击工具箱中的某个控件类, 在窗体上按住左键拖拉到所需要的大小后释放。 方法二： 双击工具箱控件类，则立即在窗体出现一个默认大小的对象框。 方法三：在窗体上选定已创建好的某个对象，通过剪贴板，复制并粘贴出多个同类的对象（不要创建控件数组）。 （2）编辑对象 先选中对象（单击对象）， 设置对象的属性(如：移动位置、放大与缩小等) 删除对象 通过剪贴板复制对象,4. 对象的建立与编辑,每一个对象都有自己的名字。每个窗体、控件对象在建立时VB系统给出了一个默认名。用户可通过属性窗口来给对象重新命名。,5. 对象的命名,命名的原则： 1）必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线（最好不用）串组成。 2）长度=255个字符。,属性是对象中的数据，是用来描述和反映对象特征的参数。例如：控件名称（Name)、标题（Caption)、颜色（Color)、字体（FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能。 对象属性设置的方法： 方法一： 在设计模式下，通过属性窗口直接设置对象的属性。 方法二： 在程序的代码中通过赋值实现，其格式为： 对象.属性=属性值 例如：cmdDisp.Caption=“显示“,6. 属性及其设置方法,事件 可被对象识别的动作。 事件过程 是指附在该 对象上的程序代码，是事件触发后处理的程序。事件过程的形式如下： Sub 对象名_事件过程名（参数列表） (事件过程代码） End Sub 例如： Sub cmdHide_Click() CmdHide.Visible=False End Sub,7. 事件及事件过程,在对象上可操作的过程，是VB系统提供的一种特殊的过程和函数方法。方法是面向对象的，所以对象的方法调用一般要指明对象。 对象方法 调用形式： 对象.方法 参数列表 如省略对象，表示在当对象，一般指窗体。 例如： Form1.print “ VB程序设计“ Form2.Show 该语句可以装入并显示窗体Form2 Form2.Hide 该语句可以将窗体Form2隐藏起来,8. 方 法（Method）,2.2建立简单的VB应用程序,1设计VB应用程序的主要步骤 (1) 分析问题：设计出合适的算法 (2) 新建工程 (3) 设计用户界面 (4) 设置界面上各个对象的属性： (5) 编写各个对象的事件代码。 (6) 保存工程 (7) 运行和调试程序,2简单程序设计举例,例2.1 在窗体中显示、移动图片;,例2.2 输入身高与体重，计算体重BMI指数。,2控件的建立与调整方法,（1）添加控件 在工具箱中单击所需控件后，鼠标指针呈十字形，此时，在窗体中的适当位置拖动鼠标。 在工具箱中双击所需控件类的图标，可以在窗体中央自动生成一个对象。,（2）编辑控件 选定控件 移动控件 改变控件大小:拖动句柄点 ;属性窗口(Width和Height) 复制控件:“复制”（Ctrl+C）; “粘贴”（Ctrl+V）. 删除控件 控件布局 :排列控件,对齐,统一尺寸,调整间距,2.3 窗体和基本控件,一、控件的通用属性 1. Name名称属性 在VB中创建的对象都有默认的名称，若非必要，可以不改。控件名是作为对象的标识只在程序中引用，不会显示在窗体上。,包括：Height、width、top和left共四个属性 单位为twip： 1 twip=1/20点 =1/1440英寸 =1/567cm,2. 控件的位置和尺寸,控件的颜色属性包括背景颜色（BackColor属性）和前景颜色（ForeColor属性）两种。 颜色属性的值（颜色值）是一个长整型的数值，通常以16进制数的形式表示。 在设计模式下可以通过属性窗口打开“颜色”对话框，利用“调色板”直接选择颜色来进行设置。,3控件的颜色属性,4. 选定颜色,也可在程序中设置颜色，例如： Form1.BackColor = RGB(255, 0, 0) Form1.BackColor = &HFF& Form1.BackColor = vbRed,FontName属性是字符型，决定对象上正文的字体（缺省为宋体）。 FontSize属性是整型，决定对象上正文的字体大小。 FontBold属性是逻辑型，决定对象上正文是否是粗体。 FontItalic属性是逻辑型，决定对象上正文是否是斜体。 FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。 FontUnderLine属性是逻辑型，决定对象上正文是否带下划线。,4. 字体Font属性组,决定控件是否可操作。 True ：允许用户进行操作，并对操作出响应（缺省值） False：呈暗淡色，禁止用户进行操作。 6. Visible属性（逻辑值） 决定控件是否可见 True ：运行时控件可见（缺省值） 。 False：运行时控件隐藏，用户看不到，但控件本身是存在的。,5. Enabled属性（逻辑值）,1窗体的常见属性,二、窗体 1常见属性,窗体也是一种对象，具有自己的属性、事件和方法。,（1）Caption属性,窗体除具备上面的通用属性外，还具备以下常见属性：,(2) BorderStyle属性,窗体的BorderStyle属性决定了窗体的边框样式。,(3) Picture属性,Picture属性用于设置在窗体上显示的背景图片，其默认值为None，表示无图片。,Form1.Picture=LoadPicture(“C:Windowswz.jpg“) Form1.Picture=LoadPicture(“),按Del键，可 取消背景图片,Icon属性用于改变系统提供的默认窗体图标，设置方法与Picture属性相同。但只有在ControlBox属性为Ture时才有效 。,(4) Icon属性与 ControlBox属性,(5) MinButton属性与 MaxButton属性 (6) Moveable属性,(7) WindowsState属性,WindowsState属性用来设置窗体的操作状态 0-Normal：正常窗口状态，有窗口边界； 1：最小化状态，以图标方式运行； 2：最大化状态，无边框，充满整个屏幕。 (8) AutoRedraw属性 该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示时，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出。 当为True时，重新还原该窗体以前的画面。 当为False时，则不重画AutoRedraw属性。,2. 窗体的常用事件,最常用的事件 1、Click/DblClick：单击/双击窗体触发。 2、Load：窗体被装入时触发的事件。该事件通常用来在启动应用 程序时对属性和变量进行初始化。 3、Unload事件 卸载窗体时触发该事件。 4、Resize事件 无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件。,窗体常用的方法有： 打印输出Print 移动Move 清除Cls 显示Show 隐藏Hide等方法。 方法的使用的形式: 对象.方法 参数,3. 窗体的常用方法,Print方法的一般形式: 对象. Print Spc(n)|Tab(n) 表达式列表 ;|， 作用: 在对象上输出信息 对象： 窗体、图形框或打印机(Pinter) ,省略对象在窗体上输出。 Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：将光标定位到当前行的第n列，允许重复使用。 ；(分号)：光标定位上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 每个打印区占14列。 无；无：输出完表达式列表的值后换行。,(1) Print方法,形式 : 对象.Cls 作用 : 清除运行时在窗体或图形框中显示的文本或图形。 注意 : Cls方法不能清除在设计时的文本和图形。清屏后坐标当前回到原点。 例： Form1.Cls 说明：使用Cls方法后，对象的当前坐标为（0，0）,(2) Cls方法,形式 : 对象.Move 左边距离，上边距离，宽度，高度 作用 : 移动窗体或控件，并可改变其大小。 对象：可以是窗体及除时钟、菜单外的所有可视控件，省略代表窗体。 左边距离，上边距离，宽度，高度：数值表达式，以twip为单位。如果是窗体对象，则“左边距”和“上边距”是以屏幕左边界和上边界为准。其它则是以窗体的左边和上边界为准。,(3) Move方法,Show方法用于在屏幕上显示一个窗体，调用 Show 方法与设置窗体 Visible 属性为 True 具有相同的效果。 其调用格式如下： 窗体名.Show vbModal | vbModeless,说明:（1）该方法有一个可选参数，0（系统常量vbModeless）或1（系统常量vbModal），若未指定参数，则默认为vbModeless。 （2）如果要显示的窗体事先未装入，该方法会自动装入该窗体再显示。,(4) Show(显示)方法,Hide方法用于使指定的窗体不显示，但不从内存中删除窗体。其调用格式为： 窗体名.Hide,说明：当一个窗体从屏幕上隐去时，其Visible属性被设置成False，并且该窗体上的控件也变得不可访问，但对运行程序间的数据引用无影响。若要隐去的窗体没有装入，则Hide方法会装入该窗体但不显示。,(5) Hide（隐藏）方法,Private Sub Command1_Click() Form1.Cls Form1.Print “123“; Tab(10); “$“ Print “123“; Spc(10); “$“ Print “123“; Tab(2); “$“; Print Date End Sub,例2.4 在窗体Form1中输出数据1,Private Sub Command2_Click() Form1.Cls Form1.Move 1000, Form1.Top+100,Form1.Width+100, 3000 Print “1234567“; “890123“, “abcde“ Print “1234567“; “8901234“, “abcde“ Print 1; -2; 3, 58 Print 1, -2, 3; 58 Print 1; “abc“; -2; “def“; 3; True; -5 End Sub,例2.4 在窗体Form1中输出数据2,例2.4 实现显示或隐藏窗体。,为了实现这一功能，可以在窗体Forml的“代码”窗口中输入下列代码： Private Sub Form_Click() Form1.Hide 隐藏窗体 MsgBox “单击确定按钮，使窗体重现屏幕“ Form1.Show 重现窗体 Print “请试一下窗体的AutoRedraw属性！“ End Sub,标签用来在窗体中显示文字，如下图所示。,三、标签,基本属性: Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与窗体相同。 （1）Caption属性 Caption属性用来改变Label控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉。 （2） Alignment属性 设置Caption属性中文本的对齐方式，共有三种可选值： 0 左对齐(Left Justify)； 1 右对齐(Right Justify)； 2 居中对齐(Center Justify)。,1. 标签的常用属性,该属性用于确定标签的背景是否透明。有两种情况可选： 值为0时，表示背景透明，标签后的背景和图形可见； 值为1时，表示不透明，标签后的背景和图形不可见。,（3）BackStyle属性,AutoSize属性确定标签是否会随标题内容的多少自动变化。如果值为True，则随Caption内容的大小自动调整控件本身的大小，且不换行；如果值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。,（4）AutoSize属性,(5) BordeStyle 两种值，即0和1。默认值为0，表示该标签无边框； 当设置其值为1时，表示该标签有边框。,(1) Change事件 程序运行时，当标签的Caption属性值发生变化时触发其Change事件。 (2) Click事件 程序运行时，用鼠标单击标签，可以触发其Click事件。 (3) Dbclick事件 程序运行时，用鼠标双击标签，可以触发其Dbclick事件。,2. 标签的常用事件,3. 标签的方法,实际应用时，标签控件一般只用于信息的简单输出，不需要使用其它方法。,基本属性：Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签相同。 （1）Text文本属性 在文本框中显示的正文内容存放在Text属性中。当程序运行时，用户通过键盘输入的文字内容，保存在Text属性中。 例如：x =Val(Text1.Text) Text2.Text = “计算机科学学院“ 注意：文本框没有Caption属性,四、文本框（TextBox）,文本框通常用于用户输入数据，也可用于输出数据。输出数据是通过对文本框的Text属性赋值来实现的。,1. 文本框的常用属性,设置正文的最多字符个数, 0任意长度值。 (3) Alignment属性 (与标签的Alignment属性相同) （4） MultiLine： 是否为多行,默认一行. False （5）ScrollBars： 当MultiLine为True时,该属性才有效,滚动条的形式。 0-None：无滚动条、1-Horizontal：水平滚动条、 2-Vertical垂直滚动条、3-Both水平和垂直滚动条。 （6）Locked： 是否可被编辑属性，False，表示为可编辑。 （7）PassWordChar属性 设置PasswordChar属性为了掩盖文本框中输入的字符。 该属性的设置只有在MultiLine设为 False才有效,（2）Maxlength属性,这三个属性是文本框中对文本的编辑属性。 SelStart：确定在文本框选中文本的起始位置。第一字符 的位置为0。若没有选择文本，则用于返回或设置文本的插入点位置，如果SelStart的值大于文本的长度，则SelStart取当前文本的长度： SelLength：设置或返回文本框中选定的文本字符串长度（字符个数）。 SelText：设置或返回当前选定文本中的文本字符串。,（8）SelStart、SelLength和SelText属性,(1) Change事件： 当改变文本框的Text属性时会引发该事件。当用输入一个字符，就会触发一次Change事件。 例：在文本框Text1的Change事件编写有如下程序代码： Private Sub Text1_Change() Print Text1.tex End Sub 当程序运行后中输入ABCD，则在窗体上在输出结果是？,2. 文本框的常用事件,Private Sub 对象_KeyDown(index as integer , _ Keycode as integer, Shift as integer) End Sub - Private Sub 对象_KeyUp(Index as integer , _ Keycode as integer, Shift as integer) End Sub,(2) KeyDown事件 与 KeyUp 事件, Index参数：当文本框是是控件数组中的一个元素时， Index代表元素在数组中的索引值，即下标。 Keycode参数：键盘扫描码，同大写字母或下位键的ASCII。 Shift参数：三位二进制数，分别是Alt 、Ctrl和Shift 的状态。,当用户按下并键盘上一个ANSI键（字母键、数字键、标点符号键以及 Enter、Tab和Backspace键）时，就会触发一次该事件，并返回一个KeyAscii参数到该事件过程中。 例如： Private Sub Text1_KeyPress(KeyAscii As Integer) Print KeyAscii, Chr(KeyAscii) End Sub 当程序运行后中输入ABCD，则在窗体上在输出结果是？ （4） LostFocus ： 当控件失去焦点时发生。 （5）GotFocus ： 当控件获得焦点时发生。,（3） KeyPress事件,文本框最有用的方法是：SetFocus，使用形式： 对象.SetFocus 例如：Text1. SetFocus 功能： 是把光标移到指定的文本框对象中。,3 . 文本框的常用方法,例2.5文本框的方法与事件举例,例2.5的程序代码,Private Sub Form_Click() Text1.SetFocus End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Text2.Text = Text2.Text + Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Text3.Text = Text3.Text + Chr(KeyAscii) End Sub Private Sub Text1_Change( ) Change事件没有参数 Text4.Text = Text4.Text + Text1.Text End Sub,命令按钮CommandButton 用于在程序运行时接受用户输入的命令。 输入命令可以有三种方式: （1）鼠标单击； （2）按Tab键焦点跳转到该按钮, 再按回车键； （3）访问键（Alt+有下划线的字母） 命令按钮的基本属性有：Name、Height、Width、Top、Left、Enabled、Visible、Font等与窗体的使用相同。,五、命令按钮,（1）Caption: 标题属性命令按钮显示的内容，可在某字母前加 “&“设置快捷键。例如： &Ok , 显示 Ok （2）Default：确认属性（逻辑值），设置为True时，按Enter键相当于用鼠标器单击了该按钮。 注意1：在一个窗体只能有一个按钮的Default设置为Ture （3）Cancel:取消功能属性（逻辑值），当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同。注意1 （4）Value: 检查该按钮是否按下。该属性在设计时无效。 （5）Picture : 按钮可显示图片文件(.bmp和.Ico)，只有当Style属性值设 为1时有效。(DownPicture与DisablePicture) （6）Style : 确定显示的形式. 0