VB程序设计第二章课件.ppt

1、第二章第二章面向对象程序设计基础第2 2页本章目标d掌握VB面向对象程序设计的基本步骤和方法d掌握属性、方法和事件编程的基本要领d获得窗体编程的技能，熟悉窗体的基本属性、方法和事件d初步使用属性窗口和代码窗口进行程序设计d掌握标签、文本框和按钮控件的属性和事件 第3 3页任务任务1“快乐学习快乐学习Visual Basic”屏幕文字输出设计屏幕文字输出设计d 窗体启动后，窗体背景为蓝色，字体颜色为黄色，屏幕显示快乐学习Visual Basic！信息，如图2-1所示；单击窗体，窗体背景变为黄色，字体颜色变为红色，如图2-2所示；双击窗体，退出程序。图2-1窗体启动后屏幕显示的信息 图2-2单击窗

2、体后屏幕显示的信息第4 4页任务分析该任务我们要研究以下几项内容:1.VB中的模块、过程和工程2.VB中的窗体对象3.窗体对象的相关属性4.窗体对象的常用方法5.窗体对象的常用事件第5 5页任务分析1.VB中的过程、模块和工程在设计一个规模较大、复杂程度较高的应用程序时，往往需要按功能将按功能将程序分解成若干个相对独立的程序段程序分解成若干个相对独立的程序段，在VB中这些程序段称为过程。VB应用程序是由若干个过程构成，这些保存在文件中，每个文件的内容每个文件的内容称为一个模块称为一个模块，即一个模块可以包含多个过程。根据模块的作用不同，VB有三类模块：.Frm（窗体模块）、.Bas（标准模块）

3、和.Cls（类模块）。工程是模块的集合，一个工程可以包含多个模块工程是模块的集合，一个工程可以包含多个模块。第6 6页任务分析2.VB中的窗体对象窗体对象是 Visual Basic 应用程序的基本构造模块，是运行应用程序时，与用户交互操作的实际窗口。窗体有自己的属性、事件和方法，窗体通过响应事件，控制窗体的外观和行为。第7 7页任务分析3.窗体对象的相关属性名称：是窗体的标识名，代码中称它为Name。BackColor：设置窗体背景颜色。颜色的值通常有常数和RGB两种格式。常数格式有：黑色：vbBlack，红色：vbRed，绿色：vbGreen等等；RGB格式为：RGB(Red,Green,

4、Blue)；Red,Green,Blue为分别代表红-绿-蓝三种颜色分量的整数，范围都是0255。ForeColor：设置窗体的文本颜色。Font：设置窗体的文本字体格式。BorderStyle：设置窗体的边框风格。属性值为1-Fixed Single 与 3-Fixed Dialog 时窗体外观相同但功能不同。第8 8页任务分析3.窗体对象的相关属性(续)Caption：设置窗体标题栏上的文字。Enabled：决定运行时窗体是否响应用户事件。Height、Width：设置窗体的高度和宽度Left、Top：设置程序运行时窗体相对于屏幕的水平位置和垂直位置3.Visible：设置程序运行时窗体是

5、否可见。当Visible为False时，窗体是不可见的。WindowsState：设置程序运行中窗体的最小化、最大化和原形这三种状态。Icon：设置窗体标题栏上的图标。Picture：给窗体配上漂亮的位图。第9 9页任务分析3.窗体对象的相关属性(续)注意：窗体的Name和Caption属性，虽然缺省值相同，都是Form1，但实际意义却不一样。Caption指的窗体标题栏上的文字，Name指这个窗体的对象名,是系统用来识别对象的，编程时需要用它来指代各对象。第1010页任务分析4.窗体对象的常用方法方法指的是控制对象动作行为的方式。它是对象本身内含的函数或过程，一些对象有一些特定的方法。在VB

6、中方法的调用形式是：对象名方法名对象名方法名窗体的常用方法d Hide方法：用以隐藏窗体对象，但不能使其卸载。隐藏窗体时，它就从屏幕上被删除。如果将其 Visible 属性设置为 False，用户将无法访问隐藏窗体上的控件。第1111页任务分析4.窗体对象的常用方法(续)d Print 方法：在窗口中显示文本。对象名.Print outputlistoutputlist 参数具有以下语法：Spc(n)|Tab(n)expression charposSpc(n)可选，用来在输出中插入n个空白字符。Tab(n)可选，用来将插入点定位在第n列上。expression 可选，要打印的数值表达式或字符

7、串表达式。Charpos可选。指定下个字符的插入点。无参数的无参数的Print语句和语句和Print后加后加Chr(13)和和Chr(10)字符均表示换行。字符均表示换行。第1212页任务分析4.窗体对象的常用方法(续)d Show方法：用以显示窗体对象。d Cls方法：清除运行时窗体所生成的图形和文本。设置对象的设置对象的AutoRedraw 属性为属性为 true，可保持该对象显，可保持该对象显示在窗体中。示在窗体中。窗体对象更多的属性、方法和事件可以在安装了MSDN后，选取Form关键字，按下F1键获得帮助。第1313页任务分析5.窗体对象的常用事件对窗体对象属性的控制是通过响应事件进行

8、的，在VB中事件的调用形式是：Private Sub对象名_事件名（事件响应代码）End Sub第1414页任务分析5.窗体对象的常用事件代码部分（即事件过程）与每个事件对应。想让控件响应事件时，就把代码写入这个事件的事件过程中。事件驱动应用程序中的典型事件序列：1.启动应用程序，装载和显示窗体。启动应用程序，装载和显示窗体。2.窗体（或窗体上的控件）接收事件窗体（或窗体上的控件）接收事件。如何引发事件由用户引发（例如键盘操作或单击控件）由系统引发（例如定时器事件）由代码间接引发（例如当代码装载窗体时的 Load 事件）3.如果在相应的事件过程中存在代码，就执行代码。如果在相应的事件过程中存在

9、代码，就执行代码。4.应用程序等待下一次事件。应用程序等待下一次事件。第1515页任务分析5.窗体对象的常用事件(续)第1616页任务分析5.窗体对象的常用事件(续)Load事件：窗体最主要的事件，用来在启动程序时对属性和变量进行初始化。这个事件发生在窗体被装入内存时，且发生在窗体显示之前。在窗体显示之前，Visual Basic会首先执行事件响应中的代码，然后将窗体显示在屏幕上。UnLoad（卸载）事件：卸载事件，它的作用是从内存中清除一个窗体。卸载后如果要重新装入窗体，那么新装入的窗体上的所有控件都需要重新初始化。第1717页任务分析5.窗体对象的常用事件(续)Click事件，Dblcli

10、ck事件：这两个事件在单击或双击窗体时发生。注意单击窗体中的控件时，窗体的Click事件并不会发生。Activate(活动事件)与Deactivate（非活动事件）：显示单个窗体时，Load事件后发生Activate 事件。显示多个窗体时，可以从一个窗体切换到另一个窗体。每次激活一个窗体时，发生Activate 事件，而前一个窗体发生Deactivate事件。Resize事件：在窗体被改变大小时会触发此事件。第1818页任务分析本次任务需要完成以下操作：1.在窗体的Load事件中设置输出字符串的属性，即窗体的ForeColor属性和Font属性；2.在窗体的Activate事件中调用Print

11、方法将字符串输出到屏幕上；3.在窗体的Click事件中首先调用Cls方法清除屏幕上的显示内容，然后重新设置窗体的ForeColor属性和Font属性，最后调用Print方法将字符串输出到屏幕上；4.在窗体的DblClick事件中执行UnLoad语句，卸载窗体。也可以使用End语句。第1919页任务实施1.创建新工程2.在属性窗口中设置窗体的属性第2020页任务实施3.在代码窗口编写事件代码并保存、运行源代码Private Sub Form_Click()窗体单击事件 Frm.Cls 清除窗体原有文字清除窗体原有文字 Frm.BackColor=RGB(0,255,0)RGB(0,255,0)表

12、示黄色表示黄色 Frm.ForeColor=RGB(255,0,0)Frm.FontName=隶书隶书Frm.Print Chr(13);Tab(5);快乐学习快乐学习Visual Basic！Chr(13)表示先换行再输出表示先换行再输出End SubPrivate Sub Form_Activate()窗体激活事件 Frm.Print Print方法无参数时输出一空行方法无参数时输出一空行 Frm.Print Tab(5);快乐学习快乐学习Visual Basic！Tab(n)跳过跳过n个字符的位置再输出字个字符的位置再输出字符串符串End Sub例如：窗体的Click事件和 Activa

13、te事件代码如下：第2121页任务设计完成效果第2222页任务任务2简单的文字拷贝简单的文字拷贝d界面初始状态如图2-6；首先在左面文本框输入文字，如图2-7；然后按下“确认”按钮，这时左面文本框的文字已拷贝到右面的文本框，如图2-8；当光标重新定位到左面文本框时，界面应回到初始状态。图2-6 界面初始状态 图2-7左面文本框输入文字图2-8按下“确认”按钮后的界面状态第2323页任务分析该任务我们要研究以下几项内容:按钮控件的属性及事件标签控件的属性及事件文本框控件的属性及事件标签控件按钮控件文本框控件第2424页任务分析1.1 标签(Label)控件的属性Label控件用于显示文本，Lab

14、el控件中的文本为只读文本。常用属性：BorderStyle（边框）属性：（边框）属性：本属性用来设置标签的边框类型，有两种值可选：0，代表标签无边框；1，代表标签有边框，并且具有三维效果。标签名标签名.BorderStyle=0/1（0或或1，两者取一），两者取一）Caption（标题）属性：（标题）属性：此属性用来设置在标签上显示的文本信息。标签名称标签名称.Caption=字符串字符串例：LblShow.Caption=欢迎使用VB第2525页任务分析1.1 标签(Label)控件的属性(续)Font（字体）属性（字体）属性：本属性用来设置标签显示的字体。字体改变：标签名字体改变：标签名

15、.FontName=“字体类型字体类型”例：标签名.FontName=“宋体”/“隶书”/“Arial”/“Times New Roman”字体大小改变：标签名字体大小改变：标签名.FontSize=X X 是阿拉伯数字，代表字体是几号字。如：LblShow.FontSize=11。粗体、斜体、下划线、删除线属性的设置粗体、斜体、下划线、删除线属性的设置：标签名标签名.FontBold=True/False 标签名标签名.FontItalic=True/False 标签名标签名.FontUnderline=True/False标签名标签名.FontStrikethru=True/False 第

16、2626页任务分析1.1 标签(Label)控件的属性(续)Visible（可见）属性（可见）属性：本属性在大多数控件中都有，它能设定该控件是否可见。标签名标签名.Visible=True/False BackColor、ForeColor 属性：属性：本属性在大多数控件中都有，设置控件的背景和前景颜色。标签名标签名.BackColor=颜色常数颜色常数/RGB函数函数标签名标签名.ForeColor=颜色常数颜色常数/RGB函数函数 Alignment（对齐）属性：（对齐）属性：此属性用来设置标签上显示的文本的对齐方式，分别是：左对齐，0；右对齐，1；居中显示，2。标签名标签名.Alignm

17、ent=0/1/2第2727页任务分析1.1 标签(Label)控件的属性(续)AutoSize 和和 WordWrap属性：属性：用于改变用于改变 Label控件大小以适应较长或较短的标题。控件大小以适应较长或较短的标题。AutoSize属性决定控件是否自动改变尺寸以适应其内容。如该属性设属性决定控件是否自动改变尺寸以适应其内容。如该属性设为为True，Label控件控件 就会根据其内容进行水平方向变化。就会根据其内容进行水平方向变化。WordWrap属性决定控件是否自动通过换行以适应属性决定控件是否自动通过换行以适应Label控件的大小。控件的大小。为了使标签具有垂直伸展和字换行处理，必须

18、设置它的为了使标签具有垂直伸展和字换行处理，必须设置它的AutoSize属属性和性和WordWrap属性同时为属性同时为True。第2828页任务分析1.2标签(Label)控件的事件标签控件的主要作用在于显示文本信息，但也支持一些为数不多的事件。如 Click 事件。第2929页任务分析2.1按钮(CommandButton)控件的属性Cancel（取消）属性（取消）属性：当一个按钮的 Cancel 属性设置为 True 时，按 ESC 键与单击此命令按钮的作用相同，因此，这个命令按钮被称为取消按钮。在一个窗体中，只允许一个命令按钮的 Cancel 属性为 True。Default（默认）属

19、性（默认）属性：当一个按钮的 Default 属性设置为 True 时，按回车键与单击此命令按钮的作用相同，因此，这个命令按钮被称为默认按钮。与 Cancel 的设置一样，在一个窗体中，只允许一个命令按钮的 Default 属性设置为 True。第3030页任务分析2.1 按钮(CommandButton)控件的属性(续)Caption（标题）属性（标题）属性：显示控件标题的属性。Enabled（可用）属性（可用）属性：本属性决定了控件是否可用。当值为 False，按钮在程序运行时呈灰色，不能响应用户的鼠标动作。按钮控件名称按钮控件名称.Enabled=True/FalseStyle（类型）与

20、（类型）与 Picture（图片）属性（图片）属性：为了让应用程序的操作界面更美观一点，可以在某个按钮上添加幅小图片，那么，就得使用到按钮控件的 Style 与 Picture 属性。按钮名称按钮名称.Style=VbButtonStandard/VbButtonGraphical或者：按钮名称按钮名称.Style=0/1按钮名称按钮名称.Picture=图形文件所在的路径与文件名图形文件所在的路径与文件名 第3131页任务分析2.2 按钮(CommandButton)控件的事件CommandButton的事件最常用的事件是单击（Click）事件，当单击按钮时，犹如发出了一道命令，而这也正是“

21、命令按钮”这个名称的由来。第3232页任务分析3.1文本框控件的主要属性Text（文本）属性（文本）属性：用来显示文本框中的文本内容。Text 属性可以用三种方式设置：设计时在设计时在“属性属性”窗口进行窗口进行运行时通过代码置运行时通过代码置在运行时由用户输入。在运行时由用户输入。文本框控件对象名文本框控件对象名.Text=欲显示的文本内容欲显示的文本内容例如：TxtFont.Text=隶书第3333页任务分析3.1文本框控件的主要属性(续)SelText（选选中中文文本）本）属属性性：返回或设置当前所选文本的字符串，如果没有选中的字符，那么返回值为空字符串即。一般来说，选中文本属性跟文件复

22、制、剪切等剪贴板（在 VB 中剪贴板用 Clipboard 表示）操作有关。如要将文本框选中的文本拷贝到剪贴板上：Clipboard.SetText 文文本本框框名名称称.SelText（注意，本行没有表示赋值的等号。）要将剪贴板上的文本粘贴到文本框内：文文本本框框名名称称.SelText=Clipboard.GetText（注意，本行有表示赋值的等号。）例：Private Sub cmd1_Click()Clipboard.SetTextTxt1.SelTextTxt2.SelText=Clipboard.GetTextEnd Sub第3434页任务分析3.1文本框控件的主要属性(续)Max

23、Length（最大长度）属性（最大长度）属性：限制文本框中可输入字符个数的最大限度，默认为 0，表示在文本框所能容纳的字符数没有限制，文本框所能容纳的字符个数是 64K。文本框控件名文本框控件名.Maxlength=XMultiLine（多行）属性（多行）属性：文本框是否可以显示或输入多行文本，当值为 True，文本框可以容纳多行文本；当值为 False，文本框则只能容纳单行文本。只在设计时属性窗口中指定，程序运行时不能改变。只在设计时属性窗口中指定，程序运行时不能改变。第3535页任务分析3.1文本框控件的主要属性(续)ScrollBars（滚动条）属性（滚动条）属性：设置文本框是否有滚动条

24、。值为 0，文本框无滚动条；值为 1，只有横向滚动条；值为 2，只有纵向滚动条；值为 3，文本框的横竖滚动条都具有。PasswordChar（密码）属性（密码）属性：作为口令功能进行使用。例如，若希望在密码框中显示星号，则可在“属性”窗口中将 PasswordChar 属性指定为“*”。注意，如果文本框控件的 MultiLine（多行）属性为 True，那么文本框控件的 PasswordChar 属性将不起作用。第3636页任务分析3.1文本框控件的主要属性(续)Locked（锁定）属性：当值为 False，文本框中的内容可以编辑；当值为 True，文本框中的内容不能编辑，只能查看或进行滚动操

25、作。此时相当于标签控件。第3737页任务分析3.2文本框控件的事件(续)除了 Click、DbClick 这些不常用的事件外，与文本框相关的主要事件是 Change、GotFocus、LostFocus 事件。1Change 事件：当用户向文本框中输入新内容，或当程序把文本框控件的 Text 属性设置为新值时，触发 Change 事件。2GotFocus 事件：本事件又名“获得焦点事件”。获得焦点可以通过诸如Tab键切换，或单击对象之类的用户动作，或在代码中用SetFocus方法改变焦点来实现。3LostFocus 事件：失去焦点，焦点的丢失或者是由于TAB 切换或单击另一个对象操作的结果，或者是代码中使用SetFocus方法改变焦点的结果。第3838页任务实施1.创建新工程2.从工具箱中选择控件拖入窗体标签控件按钮控件文本框控件第3939页任务实施3.设置窗体及控件的属性第4040页任务实施4.在代码窗口编写事件代码并保存、运行源代码第4141页任务设计完成效果第4242页总结d 本课讲述了以下内容：1.VB中的模块、过程和工程2.VB中的窗体对象的相关属性、方法和事件3.按钮控件的属性及事件4.标签控件的属性及事件5.文本框控件的属性及事件回到目录回到目录