VisualBasic编程基础课件

VisualBasic编程基础

第2章本章要点事件驱动编程机制窗体及基本控件几个常用的语句1.对象的概念在现实生活中，对象是具有某些特性的具体事物，如一个人、一台电脑等；在面向对象程序中，对象就是系统中运行的基本实体，如一个窗体、一个命令按钮等。

任何一个对象都有属性、事件和方法三个要素，各从不同的角度表达了对象的构成，通过三者有机的结合，便构成一个完整的VB应用程序。2.1事件驱动编程机制2.1.1对象和类的概念

2.类的概念类是同种对象的集合与抽象，它包含所创建对象的属性描述和行为特征的定义。类是对象的定义，而对象是类的一个实例。如汽车是类，某一辆具体的小轿车是对象。在VB中，工具箱中的可视类图标是VB系统设计好的标准控件类，此外，还可在“工程”菜单的“部件”项中加入大量的ActiveX控件。当在窗体上画一个控件时就是将类实例化（把类转换为对象），即创建了一个控件对象，简称控件。2.1事件驱动编程机制2.1.1对象和类的概念

内部控件ActiveX控件

（前20个）控件类：2.1事件驱动编程机制2.1.1对象和类的概念

对象类2.1事件驱动编程机制2.1.1对象和类的概念

对象属性属性解释属性显示方式（1）利用“属性”窗口编辑对象的属性

在“工程设计”窗口选中要设置属性的对象，选择“视图”菜单“属性窗口”项，打开“属性”窗口；或右击对象，在快捷菜单选择“属性窗口”。2.1事件驱动编程机制2.1.2对象的属性、方法和事件

（2）利用属性设置语句格式1：[<父类名>].<对象名>.属性名=<属性值>

例：PrivateSubForm_Load()Cmd1.Caption="退出"Cmd1.Left=4680Cmd1.Top=5280Cmd1.Height=615Cmd1.Width=1335EndSub2.1事件驱动编程机制2.1.2对象的属性、方法和事件

格式2：With<对象名><属性值表>Endwith例：PrivateSubForm_Load()WithCmd1.Caption="退出".Left=4680.Top=5280.Height=615.Width=1335EndWithEndSub2.1事件驱动编程机制2.1.2对象的属性、方法和事件

定义事件过程的语句格式：

PrivateSub对象名称_事件名称([（参数列表）])

<程序代码>

EndSub例如：PrivateSubCommand1_Click()

Command1.FontSize=20'字体大小为20磅

……

EndSub注意:用户对一个对象发出一个动作时，可能同时触发多个事件(如Click、MouseDown、MouseUp),写程序时只需对感兴趣的事件过程编码，没有编码的空事件不加处理。2.1事件驱动编程机制2.1.2对象的属性、方法和事件

3.方法

方法是附属于对象的行为和动作，也可以将其理解为指示对象动作的命令，即VB系统提供的一种特殊的过程和函数。

VB中的内部控件都具有定义好的方法，不同的对象有不同的方法。（请见附录）调用方法的语句格式：

[<对象名>].方法名

例如：Form1.Print“GoodMorning!”

Picture1.Cls2.1事件驱动编程机制2.1.2对象的属性、方法和事件

4.利用“代码”窗口编辑对象的事件和方法

（1）在“工程设计”窗口选中某一对象，选择“视图”菜单“代码窗口”项，或使用右键菜单，或双击某一对象，打开其“代码”窗口；（2）在“代码”窗口通过“对象”组合框选择对象，通过“事件”组合框选择事件，系统自动给出事件过程的开头和结束语句。（3）在过程的开头和结束语句之间输入代码。2.1事件驱动编程机制2.1.2对象的属性、方法和事件

两个基本要点：

（1）应用程序由对象组成，每个对象都有预先定义的事件，每个事件的发生都依赖于一定的条件（即用户的驱动或来自系统的触发）。（2）每个事件发生后系统该作出什么反应，则取决于用户给该事件过程编写了什么代码，即由用户控制事件的发生，由代码做出响应。

2.1事件驱动编程机制2.1.3事件驱动编程的基本要点

2.1事件驱动编程机制

例2-1建立一个显示当前时间的窗体，将窗体名称改为frmTime。在窗体上添加3个命令按钮，将它们的名称属性分别改为CmdRed、CmdBlue和CmdExit，Caption属性分别设置为“红色显示”、“蓝色显示”和“退出”。再添加一个标签按钮，不修改其名称。利用VisualBasic的Time函数获取当前的系统时间，并在标签中显示时间。要求程序一启动就在标签中显示机器的当前时间，若单击CmdRed按钮标签中的时间红色显示，单击CmdBlue按钮时间以蓝色显示，单击CmdExit按钮则结束程序运行。2.1.3事件驱动编程的基本要点

2.1事件驱动编程机制程序演示2.1.3事件驱动编程的基本要点

（4）窗体边框风格：BorderStyle属性（5）窗体显示状态：WindowsState属性（6）其它属性：

BackColor、Picture、ForeColor、

FontName、FontSize、FontBold、FontItalic、

FontStrikeThru、FontUnderLine、Enabled、Visible、AutoRedraw2.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：单击窗体时触发的事件。（3）DblClick：双击窗体时触发的事件。（4）Activate事件：当窗体变成活动窗体时，触发该事件。（5）UnLoad事件：将窗体从内存中卸载时，触发该事件。2.2窗体及基本控件2.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标签对象

2.2窗体及基本控件2.2.3文本框对象

文本框（Text）是一个文本编辑区域，可在该区域输入、编辑和显示文本内容。

1.文本框常用的属性（1）名称（Name）（2）Text:文本框中显示或接收的内容（3）Maxlength：允许的最大长度（4）MultiLine：是否允许多行显示（5）ScrollBars：是否加滚动条（6）Locked：Text中的内容是否可编辑（7）PassWordChar：设置输入掩码

（8）SelText：被选择的文本内容（9）SelStart：被选择的文本的起始位置（10）SelLength：被选择的文本长度（11）其它属性：

Height、Width、Top、Left、Enabled、

Visible、Font、ForeColor、BackColor、

FontName、FontSize、FontBold、FontItalic、

FontStrikeThru、Alignment等。

2.2窗体及基本控件2.2.3文本框对象

2.文本框常用的方法——SetFocus

SetFocus方法格式如下：[<对象名>.]SetFocus功能：把光标（焦点）移到[<对象名>.]指定的文本框上。当在窗体上建立了多个文本框后，可以用该方法把光标置于所需要的文本框中。2.2窗体及基本控件2.2.3文本框对象

3.文本框常用的事件（1）Change：改变文本框的Text属性时触发的事件。（2）KeyPress：单击键盘某一键并释放该按键时触发

的事件，并返回一个KeyAscii参数。（3）KeyDown：控件获得焦点，或按下键盘某一键时

触发的事件。（4）KeyUp：控件失去焦点，或释放键盘上一个键时

触发的事件。（5）LostFocus：控件失去焦点时触发的事件。（6）GotFocus：控件获得焦点时触发的事件。2.2窗体及基本控件2.2.3文本框对象

例2-5

设计一个如下图所示的输入密码窗体。演示程序2.2窗体及基本控件2.2.3文本框对象

2.2窗体及基本控件

例2-6设计一个“个人信息登记表”窗体，程序运行结果如下图所示。

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：设置工具栏提示（8）其它属性

Height、Width、Top、Left、Enabled、Visible、Font组属性、BackColor等。

2.命令按钮常用的事件

Click：单击鼠标时触发；也可以使用Tab键，将焦点跳转到指定的命令按钮上，再按回车键触发；还可以通过快捷键(Alt+下划线的字母)触发；

MouseDown、MouseUp、MouseMove：鼠标按下、释放、移过时触发。2.2窗体及基本控件2.2.4命令按钮对象

例2-7建立一个允许剪切、复制和粘贴的简单文字处理程序。程序运行结果如图所示。演示程序2.2窗体及基本控件2.2.4命令按钮对象

2.2窗体及基本控件2.2.5定时器对象

定时器(Timer)又称计时器、时钟控件，用于按指定的时间间隔、有规律地重复执行程序代码。

定时器是基于系统内部时钟进行计时。在设计阶段时钟控件出现在窗体中，在程序运行时则是不可见的。1.定时器常用的属性

（1）名称（Name）

（2）Interval：返回或设置引发Timer事件的时间间隔长度，单位为毫秒（ms，1ms=0.001s）

（3）Enabled：决定Timer控件是否开始使用。2.定时器按钮常用的事件——Timer当Enabled属性值为True，而且Interval属性值大于0时，以Interval属性指定的时间间隔触发事件。

例2-8创建一个“电子时钟”窗体，通过Command控件进行时间和日期的切换，程序运行结果如图：2.2窗体及基本控件2.2.5定时器对象

例2-9设计一个流动字幕，程序运行结果如图：2.2窗体及基本控件2.2.5定时器对象

演示程序2.3几个常用的语句

用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象。一般格式为：[Let]变量=表达式[Let]对象.属性=表达式例如：Total=99'把数值常量赋给变量TotalTextl.Text=""'把文本框Textl清空Command1.Caption="结束"'命令按钮标题为“结束”Text2.Text=Textl.Text'使Text2的Text属性值和Textl相同2.3.1赋值语句

2.3几个常用的语句

说明：（1）赋值语句兼有计算与赋值双重功能，它首先计算赋值号右边表达式的值，再把结果赋给赋值号左边的变量。（2）在赋值语句中，“=”是赋值号，与数学上的等号意义不一样。例如，语句n=n+1表示将变量n的值加上1后的结果再赋值給变量n，而不表示等号两边的值是否相等。（3）赋值号左边只能是变量或对象属性，不能出现常量或表达式。（4）变量或对象属性的类型应与表达式的类型相容。2.3.1赋值语句

2.3几个常用的语句

例2-10求一元二次方程2x2+3x+1=0的根。2.3.1赋值语句

演示程序

为了提高程序的可读性，通常应在程序的适当位置加上必要的注释。VisualBasic中的注释语句以“Rem”或撇号“'”开头。一般格式为：Rem注释内容'注释内容2.3.2注释语句

2.3几个常用的语句

说明：（1）注释语句是非执