1、2.1事件驱动编程机制 2.2窗体及基本控件 2.3几个常用的语句 本章习题,第2章 Visual Basic编程基础,1.对象的概念在现实生活中，对象是具有某些特性的具体事物，如一个人、一台电脑等；在面向对象程序中，对象就是系统中运行的基本实体，如一个窗体、一个命令按钮等。任何一个对象都有属性、事件和方法三个要素，各从不同的角度表达了对象的构成，通过三者有机的结合，便构成一个完整的VB应用程序。,2.1 事件驱动编程机制,2.1.1 对象和类的概念,在VB中，对象是用可视化工具“画”出来的，如窗体上的命令按钮、文本框等，VB自动生成对象的程序代码并封装起来；之后应说明对象的名称、颜色等属性；
2、每个对象上可以有很多事件发生，如单击、双击等；事件发生时，希望完成什么事情，需写一段对应的代码（称事件过程）；而方法就是VB提供给用户使用的一些写好的过程和函数，如Print、Move等。,2.1 事件驱动编程机制,2.1.1 对象和类的概念,2.类的概念类是同种对象的集合与抽象，它包含所创建对象的属性描述和行为特征的定义。类是对象的定义，而对象是类的一个实例。如汽车是类，某一辆具体的小轿车是对象。在VB中，工具箱中的可视类图标是VB系统设计好的标准控件类，此外，还可在“工程”菜单的“部件”项中加入大量的ActiveX控件。当在窗体上画一个控件时就是将类实例化（把类转换为对象），即创建了一个控
3、件对象，简称控件。,2.1 事件驱动编程机制,2.1.1 对象和类的概念,控件类：,2.1 事件驱动编程机制,2.1.1 对象和类的概念,2.1 事件驱动编程机制,2.1.1 对象和类的概念,2.1.2对象的属性、方法和事件,1.对象的属性属性是对象的物理性质，是用来描述和反映对象特征的参数，一个对象的诸多属性所包含的信息，反映了这个对象的状态，属性不仅决定了对象的外观（如Backcolor,height,width等属性），有时也决定了对象的行为（如Enabled,Visible等属性）。在VB系统中，各种对象拥有几十个属性，对象的属性可以在设计对象时通过“属性”窗口设置；也可以在程序运行时
4、通过事件代码进行设置。,2.1 事件驱动编程机制,（1）利用“属性”窗口编辑对象的属性,在“工程设计”窗口选中要设置属性的对象，选择“视图”菜单“属性窗口”项，打开“属性”窗口；或右击对象，在快捷菜单选择“属性窗口”。,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,（2）利用属性设置语句 格式1：.属性名 = 例：Private Sub Form_Load( )Cmd1.Caption = “退出“Cmd1.Left = 4680Cmd1.Top = 5280Cmd1.Height = 615Cmd1.Width = 1335End Sub,2.1.2对象的属性、方法和事件,2.
5、1 事件驱动编程机制,格式2： With End with 例：Private Sub Form_Load()With Cmd1.Caption = “退出“.Left = 4680.Top = 5280.Height = 615.Width = 1335End WithEnd Sub,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,2.事件事件是VB事先设置好的，能够被对象识别和响应的某些行为和动作。当用VB创建了一个应用程序，实际上就已经开始了事件驱动方式编程的工作，所有的事件代码将会在用户与应用程序交互时，或在对象间传递“消息” 时，或在系统传递“消息”时被执行。,2.1.2
6、对象的属性、方法和事件,2.1 事件驱动编程机制,定义事件过程的语句格式： Private Sub 对象名称_事件名称(（参数列表）) End Sub 例如： Private Sub Command1_Click( ) Command1.FontSize=20 字体大小为20磅 EndSub 注意:用户对一个对象发出一个动作时，可能同时触发多个事件(如Click、MouseDown、MouseUp),写程序时只需对感兴趣的事件过程编码，没有编码的空事件不加处理。,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,3.方法 方法是附属于对象的行为和动作，也可以将其理解为指示对象动作的命
7、令，即VB系统提供的一种特殊的过程和函数。 VB中的内部控件都具有定义好的方法，不同的对象有不同的方法。（请见附录） 调用方法的语句格式： .方法名 例如： Form1.Print “Good Morning!” Picture1.Cls,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,4.利用“代码”窗口编辑对象的事件和方法,（1）在“工程设计”窗口选中某一对象，选择“视图”菜单“代码窗口”项，或使用右键菜单，或双击某一对象，打开其“代码”窗口；（2）在“代码”窗口通过“对象”组合框选择对象，通过“事件”组合框选择事件，系统自动给出事件过程的开头和结束语句。（3）在过程的开头和结
8、束语句之间输入代码。,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,2.1.2对象的属性、方法和事件,2.1 事件驱动编程机制,两个基本要点：,（1）应用程序由对象组成，每个对象都有预先定义的事件，每个事件的发生都依赖于一定的条件（即用户的驱动或来自系统的触发）。（2）每个事件发生后系统该作出什么反应，则取决于用户给该事件过程编写了什么代码，即由用户控制事件的发生，由代码做出响应。,2.1.3事件驱动编程的基本要点,2.1 事件驱动编程机制,例2-1 建立一个显示当前时间的窗体，将窗体名称改为frmTime。在窗体上添加3个命令按钮，将它们的名称属性分别改为CmdRed、CmdB
9、lue和CmdExit，Caption属性分别设置为“红色显示”、“蓝色显示”和“退出”。再添加一个标签按钮，不修改其名称。利用Visual Basic的Time函数获取当前的系统时间，并在标签中显示时间。要求程序一启动就在标签中显示机器的当前时间，若单击CmdRed按钮标签中的时间红色显示，单击CmdBlue按钮时间以蓝色显示，单击CmdExit按钮则结束程序运行。,2.1.3事件驱动编程的基本要点,2.1 事件驱动编程机制,2.1.3事件驱动编程的基本要点,2.1 事件驱动编程机制,窗体（Form）是呈现在计算机屏幕上的工作窗口，它是其他控件的容器，通过在窗体中放置不同的控件，以及对控件的
10、操作，实现不同的程序功能。,1.窗体常用的属性 （1）名称（Name） （2）窗体位置与大小：Top、Left、Height、 Width （3）窗体标题栏属性：Caption、Icon、 ControlBox、MaxButton、MinButton,2.2 窗体及基本控件,2.2.1窗体对象,（4）窗体边框风格：BorderStyle属性（5）窗体显示状态：WindowsState属性（6）其它属性： BackColor、Picture、ForeColor、 FontName、FontSize、FontBold、FontItalic、 FontStrikeThru、FontUnderLine
11、、Enabled、Visible、AutoRedraw,2.2 窗体及基本控件,2.2.1窗体对象,2.窗体常用的方法 （1）Print方法：在窗体上输出表达式的值。 （2）Cls方法：清除在窗体显示的文本或图形。 （3）Move方法：移动窗体并可改变其大小。 （4）Show方法： .Show 功能：在屏幕上显示一个窗体。 （5）Hide方法： .Hide 功能：使指定的窗体隐藏起来，但不从内存中删除窗体。,2.2 窗体及基本控件,2.2.1窗体对象,3.窗体常用的事件 （1）Load：窗体被装入时触发的事件，该事件通常用来在启动应用程序时对属性和变量进行初始化。（2）Click：单击窗体时触
12、发的事件。（3）DblClick：双击窗体时触发的事件。（4）Activate事件：当窗体变成活动窗体时，触发该事件。（5）UnLoad事件：将窗体从内存中卸载时，触发该事件。,2.2 窗体及基本控件,2.2.1窗体对象,例2-2 设计一个程序，完成以下功能：程序运行时，窗口自动位于屏幕的正中央，且窗口没有最大化和最小化按钮。选择某一.ico文件作为窗体标题栏图标，窗体标题改为“窗体示例”。添加某一图片文件，作为窗体背景。在窗口中单击鼠标时，窗口将移至屏幕的左上角，同时，在窗口中用隶书、16号字、红色，输出字符串“计算机程序设计”。在窗口中双击鼠标时，程序结束运行。,2.2 窗体及基本控件,2
13、.2.1窗体对象,例2-3 创建两个窗体，通过Form_Click( )事件实现两个窗体的切换。,2.2 窗体及基本控件,2.2.1窗体对象,标签（Label）是用于显示文本信息的控件。 1.标签常用的属性 （1）名称（Name） （2）Top、Left、Height、Width （3）Caption：标签内显示的文本信息 （4）BackStyle：背景是否透明 （5）AutoSize：标签大小是否可自动调整 （6）Alignment：标签内文本的对齐方式 （7）WordWrap：是否可折行显示文本 （8）BorderStyle：边框样式,2.2.2 标签对象,2.2 窗体及基本控件,（9）B
14、ackColor：背景颜色 （10）Font属性组：设置标签的Caption属性内容的显示效果，包括FontName、FontSize、FontBold、FontItalic、FontStrikeThru等。 （11）Enabled、Visible,2.标签常用的事件标签可响应单击(Click)和双击(DblClick)事件。标签用于显示文本,一般无需编写事件过程。,2.2.2 标签对象,2.2 窗体及基本控件,3标签的常用方法标签常用的方法有Move，用于移动对象的位置并可在移动位置时改变对象的大小。该方法的格式和功能已在上一小节介绍。Move方法也适用于其他可视对象。,例2-4 设计一个窗
15、体，要求运行效果如下图所示。,2.2.2 标签对象,2.2 窗体及基本控件,2.2.3 文本框对象,文本框（Text）是一个文本编辑区域，可在该区域输入、编辑和显示文本内容。1.文本框常用的属性（1）名称（Name）（2）Text:文本框中显示或接收的内容（3）Maxlength：允许的最大长度（4）MultiLine：是否允许多行显示（5）ScrollBars：是否加滚动条（6）Locked： Text中的内容是否可编辑（7）PassWordChar：设置输入掩码,2.2 窗体及基本控件,（8）SelText：被选择的文本内容（9）SelStart：被选择的文本的起始位置（10）SelLen
16、gth：被选择的文本长度（11）其它属性： Height、Width、Top、Left、Enabled、 Visible、Font、 ForeColor、BackColor、 FontName、FontSize、FontBold、FontItalic、FontStrikeThru、Alignment等。,2.2.3 文本框对象,2.2 窗体及基本控件,2.文本框常用的方法SetFocusSetFocus方法格式如下：.SetFocus 功能：把光标（焦点）移到.指定的文本框上。当在窗体上建立了多个文本框后，可以用该方法把光标置于所需要的文本框中。,2.2.3 文本框对象,2.2 窗体及基本控件
17、,3.文本框常用的事件 （1）Change：改变文本框的Text属性时触发的事件。 （2）KeyPress：单击键盘某一键并释放该按键时触发的事件，并返回一个KeyAscii参数。 （3）KeyDown：控件获得焦点，或按下键盘某一键时触发的事件。 （4）KeyUp：控件失去焦点，或释放键盘上一个键时触发的事件。 （5）LostFocus：控件失去焦点时触发的事件。 （6）GotFocus：控件获得焦点时触发的事件。,2.2.3 文本框对象,2.2 窗体及基本控件,例2-5 设计一个如下图所示的输入密码窗体。,2.2.3 文本框对象,2.2 窗体及基本控件,例2-6 设计一个“个人信息登记表”
18、窗体，程序运行结果如下图所示。,2.2.3 文本框对象,2.2 窗体及基本控件,2.2.4 命令按钮对象,命令按钮（CommandButton）是用于控制程序的进程，即控制过程的启动、中断或结束。1.命令按钮常用的属性（1）名称（Name）（2）Caption：命令按钮显示标题(可在某字母前加“&”设置快捷键)（3）Default：设置Enter键默认的命令按钮（4）Cancel：设置Esc键默认的命令按钮（5）Style：按钮的显示风格（6）Picture：设置按钮的图形标题 （7）ToolTipText：设置工具栏提示,2.2 窗体及基本控件,（8）其它属性 Height、Width、To
19、p、Left、Enabled、Visible、Font组属性、BackColor等。 2.命令按钮常用的事件 Click：单击鼠标时触发；也可以使用Tab键，将焦点跳转到指定的命令按钮上，再按回车键触发；还可以通过快捷键(Alt+下划线的字母)触发； MouseDown、MouseUp、MouseMove：鼠标按下、释放、移过时触发。,2.2.4 命令按钮对象,2.2 窗体及基本控件,例2-7 建立一个允许剪切、复制和粘贴的简单文字处理程序。程序运行结果如图所示。,2.2.4 命令按钮对象,2.2 窗体及基本控件,2.2.5 定时器对象,定时器 (Timer)又称计时器、时钟控件，用于按指定的
20、时间间隔、有规律地重复执行程序代码。 定时器是基于系统内部时钟进行计时。在设计阶段时钟控件出现在窗体中，在程序运行时则是不可见的。1.定时器常用的属性 （1）名称（Name） （2）Interval：返回或设置引发Timer事件的时间间隔长度，单位为毫秒（ms，1ms=0.001s） （3）Enabled：决定Timer控件是否开始使用。,2.2 窗体及基本控件,2.定时器按钮常用的事件Timer当Enabled属性值为True，而且Interval属性值大于0时，以Interval属性指定的时间间隔触发事件。,例2-8 创建一个“电子时钟”窗体，通过Command控件进行时间和日期的切换，程
21、序运行结果如图：,2.2.5 定时器对象,2.2 窗体及基本控件,例2-9 设计一个流动字幕，程序运行结果如图：,2.2.5 定时器对象,2.2 窗体及基本控件,2.3 几个常用的语句,用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象。 一般格式为： Let 变量 = 表达式 Let 对象.属性 = 表达式 例如： Total=99 把数值常量赋给变量Total Textl.Text =“ 把文本框Textl清空 Command1.Caption =“结束“ 命令按钮标题为“结束” Text2.Text = Textl.Text 使Text2的Text属性值和Textl相同,2.3.1
22、 赋值语句,说明： （1）赋值语句兼有计算与赋值双重功能，它首先计算赋值号右边表达式的值，再把结果赋给赋值号左边的变量。 （2）在赋值语句中，“=”是赋值号，与数学上的等号意义不一样。例如，语句n=n+1表示将变量n的值加上1后的结果再赋值給变量n，而不表示等号两边的值是否相等。 （3）赋值号左边只能是变量或对象属性，不能出现常量或表达式。 （4）变量或对象属性的类型应与表达式的类型相容。,2.3 几个常用的语句,2.3.1 赋值语句,例2-10 求一元二次方程2x2+3x+1=0的根。,2.3 几个常用的语句,2.3.1 赋值语句,为了提高程序的可读性，通常应在程序的适当位置加上必要的注释。
23、Visual Basic中的注释语句以“Rem”或撇号“ ”开头。一般格式为：Rem 注释内容注释内容,2.3.2 注释语句,2.3 几个常用的语句,说明： （1）注释语句是非执行语句，仅对程序的有关内容起注释作用。 （2）任何字符（包括汉字）都可以放在注释行中作为注释内容。注释语句通常放在过程、模块的开头作为标题用（如例2-1所示），也可以放在执行语句的后面，这时注释语句必须是最后一个语句。 （3）注释语句不能放在续行符的后面。 （4）当注释语句出现在语句行的后面时，只能使用撇号“”，不能使用Rem。,2.3.2 注释语句,2.3 几个常用的语句,1暂停语句（Stop）Stop 语句用来暂停
24、程序的执行。格式： Stop作用：类似于执行“运行”菜单中的“中断”命令，在程序中设置一个断点。当程序执行到Stop语句时将暂停，VB解释程序置为中断（Break）模式，并自动打开立即窗口，便于程序检查和调试。 一旦VB应用程序通过编译并能运行，则不再需要解释程序的辅助，也不需要进入中断模式。因此，程序调试结束后，生成可执行文件之前，应删去代码中的所有Stop语句。,2.3.3 暂停和结束语句,2.3 几个常用的语句,2结束语句（End）End语句通常用来结束一个程序的执行。 其格式为： End可以把它放在事件过程中，例如Sub Command1_Click()EndEnd Sub该过程的作用是在用户单击命令按钮时，结束程序的运行。,2.3.3 暂停和结束语句,2.3 几个常用的语句,本章习题,1.(1)(5)(6)(7) 2.(3)(5),第2章 Visual Basic编程基础,事件驱动,程序代码不是按“预定”的路径执行，而是在响应用户的动作（引发不同事件的发生）时，驱动不同的事件代码，以此控制程序的运行流向。根据实际需要，每次运行程序时所执行的代码和经过的路径可以是不一样的。,例2-2 设计一个程序，完成以下功能,
