第5节 对象、属性和事件
知识点
目标
考试要求
算法的程序实现
①对象、属性、事件和事件处理的概念
②VB应用程序的界面设计与调试
c
必考＋加试
1.VB工程文件的扩展名是.vbp，窗体文件的扩展名是.frm，生成的可执行文件扩展名是.exe。
2.常见基本控件有标签Label、按钮CommandButton、文本框TextBox、列表框ListBox等。
3.常见的对象有窗体Form以及由控件生成的对象，如文本框Text1、列表框List1。
4.描述对象的状态和外观，称为对象的属性。描述对象的行为和动作，称为对象的方法。
一、控件和对象的关系
1.控件在窗体中形成对象，一类控件可以生成多个对象，但每个对象的名称必须是唯一的。类似于Flash软件中元件和实例的关系，元件在库中，实例在舞台上。
2.每个对象有宽、高、颜色和显示的文字内容等状态，称为属性，是对象的外观。可以在属性窗口中进行修改，由同一类控件生成的对象，其属性可以不相同。也可以通过程序代码进行修改对象的属性。
3.属性的表示方法：对象名.属性名。如Text1.Text、Label1.Caption、Command1.Caption。
4.对于属性的操作往往有两种，一种是修改属性，一种是把属性值赋给某个变量。
修改属性
属性值赋给某个变量
对象名、属性名＝属性值
变量名＝对象名、属性名
5.掌握常见对象的属性名
对象名称
常用属性
窗体(Form)
Caption
按钮(Command)
Caption
标签(Label)
Caption
文本框(Text)
Text
6.一个对象可以发生某些行为或动作，如清除列表框内容，向列表框中添加列表，这些称为对象的方法。如List1.AddItem “列表项”、 List1.Clear。
【例1】 在VB中，同一窗体中某两个对象的属性窗口如下图所示。
关于这两个对象说法正确的有( )
A.具有相同的背景颜色
B.只能在属性窗口中修改属性值
C.可以把对象Cmd1中的名称改为“Lab1”
D.显示的文字是一样的，因此是由同一类控件产生的对象
解析 本题考核的知识点是对象的属性。对象属性值可以在属性窗口中修改，也可以在程序代码中修改。一个窗口中不允许两个相同的对象名，题图中是两个不同类型的对象。
答案 A
[方法总结] 掌握控件和对象的联系和区别，VB程序语言是面向对象的编程语言。
【变式训练】 在文本框Text1中输入了“你好”，实例修改了该对象的属性名称是( )
A.BackColor B.Caption
C.Text D.Height
解析 窗体、按钮和标签上显示文字用Caption属性，程序运行时，都能显示内容，但不能输入修改内容。文本框通过Text属性，既可以输入信息，也可以输出信息。
答案 C
二、事件和事件处理过程
1.事件是发生在对象上的过程，通常是由用户在对象上激发的一种动作，如鼠标单击(Click)、窗体加载(Load)和按下某个键(KeyPress)等。
2.事件处理过程是针对某个具体对象某个事件编写的程序代码。
【例2】 某VB窗体中，事件窗口如下图所示。
则下列说法错误的是( )
A.该窗体中已经编写了2个事件过程
B.当前正在编写的是Cmd1的Click事件
C.运行程序，当前窗体中有对象会显示“用户名”字样
D.仅把窗体中代码“Cmd1_Click”改为“Comand1_Click”，程序运行时，单击按钮也可以执行相应的过程代码
解析 本题考核的知识点是事件及事件的处理过程。题图中所示有Cmd1的Click事件和Form的Load事件，从图中所示，当前正在编辑Cmd1的Click事件。Form窗体的Load事件表示窗体装载或打开时就执行，因此会在Labe1对象上显示用户名字样。把对象名称修改后，程序运行时，找不到该对象，不会执行相应代码。
答案 D
【变式训练】 例2中的两个事件处理过程名称__________、_________________。
解析 事件处理过程名指某个对象的事件，中间用下划线连接。
答案 Cmd1_Click Form_Load
三、程序调试
编写的程序，如果出现语法和逻辑错误，在程序运行时，将会出现相应的错误提示。
1.要求对象。程序代码中出现了某个对象，但在窗体中没有这个对象，或者窗体中的对象修改了名称。
2.未找到方法或数据成员。属性或方法名称错误。
3.类型不匹配。赋值号两边的数据类型不一致。
4.溢出。计算的数值大小超出了整型范围。
5.程序结构出错。如选择结构的格式，For循环中没有Next语句配对，IF结构没有End IF等等
6.子程序未定义。函数名称出错。
【例3】 某VB程序运行时出现了错误提示，运行界面和提示信息如下图所示：
程序代码如下。
Private Sub Command1_Click()
Dim x As Single
x＝Val(Text1.Text)
Text2.Text＝Sqr(x)
End Sub
则出错错误提示的可能原因是( )
①在文本框Text1中输入了一个负数 ②窗体中缺少文本框Text1 ③窗体中缺少文本框Text2 ④窗体中缺少按钮Command1 ⑤Text1对象没有Text属性 ⑥窗体中对象Text2修改为Txt2。
A.①②③ B.②③④
C.②③⑥ D.②④⑥
解析 本题考核的知识点是程序的调试。出现的错误提示是要求对象，是程序代码中的对象在窗体中找不到，代码中共涉及到Text1、Text2和Command1三个对象，若没有Command1对象，不能响应他的单击事件。
答案 C
[方法总结] 先从错误原因着手，再去对应错误出处。
【变式训练】 在文本框Text1、Text2中输入内容，单击按钮Command1，在标签Label1、Label2中输出相关信息，代码如下：
Private Sub Command1_Click()
Dim a As Integer，b As Integer
a＝Val(Text1.Text) ′①
b＝Val(Text2.Text)
a＝a＋b
b＝a＋b ′②
Label1.Text＝Str(a) ′③
Label2.Caption＝Abs(b) ′④
End Sub
程序在运行时出现了如图所示的错误提示，则出错的语句是( )
A.① B.② C.③ D.④
解析 从错误提示信息来看，是对象的属性出现错误。
答案 C
1.下列属于窗体文件的是( )
A.登录.vbp B.登录.frm
C.登录.exe D.登录.vbw
答案 B
2.下图是Visual Basic窗体中某对象的属性窗口( )
下列说法错误的是( )
A.该对象的名称是Lb1
B.该对象属于标签类
C.Caption是该对象的一个方法
D.该对象上显示“welcome！”字样
解析 Caption是属性。
答案 C
3.在VB中，语句L1.AddItem Str(n)中的“AddItem”是( )
A.事件名 B.方法名
C.属性名 D.对象名
解析 属性名往往会赋予一个属性值，而方法是一个动作，没有赋值号。
答案 B
4.执行语句“Form1.Caption＝height”后引起的变化是( )
A.Form1对象的高度改变
B.Form1对象的背景颜色改变
C.Form1对象标题栏中的文字改变
D.Form1对象的名称改变
答案 C
5.在VB中，将窗体Form1的Caption属性值设置为“登录”，正确的代码是( )
A.Form1.Caption”登录”
B.Form1.Caption(”登录”)
C.Caption(登录)
D.Form1.Caption＝”登录”
答案 D
6.有如下VB程序段：
Private Sub Label1_Click()
Dim r As Integer
r＝4
Text1.Text＝Str(3.14159*r*r)
End Sub
能运行这段程序的事件是__________，该事件处理过程名称是__________。
解析 事件指鼠标和窗体装载的动作，事件处理过程是某个具体对象某个事件编写的程序代码。
答案 Click Label1_Click
7.在VB中，鼠标单击窗体Form触发的事件处理过程名为( )
A.Command1_Click B.Form_Click
C.Form_Load D.Form_DblClick
答案 B
8.某VB程序如下：
Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii＝13 Then
Text1.Text＝Label1.Caption
End If
End Sub
程序运行时，能触发该事件过程的是( )
A.单击按钮Command1
B.单击文本框Text2
C.文本框Text1被激活后，用户在键盘上按下某一个键
D.文本框Text2被激活后，用户在键盘上按下某一个键
答案 D
9.小王编写了一个计算月工作量的Vb程序，在列表框List1中选择某个月份，在文本框Text1中显示选择的月份，单击“计算”按钮Command1，在文本框Text2中显示该月的工作量，程序运行的界面如下图所示。
程序代码如下，请把空白处填写完整。
′以下为单击列表框List1，在文本框Text1中显示某个月份的事件过程
Private Sub ____①____()
′代码略
End Sub
′以下为单击“计算”按钮Command1，在文本框Text2中显示该月的工作量的事件过程
Private Sub ____②____()
′代码略
End Sub
解析 明确对象名和事件名称。
答案 ①List1_Click ②Command1_Click
10.运行如下程序代码，出现了如图所示错误提示，则出错的语句是( )
Private Sub Command1_Click()
Dim s As Integer
Dim i As Integer ′①
For i＝1 To 1000 ′②
s＝s＋i ′③
Next i
Text1.Text＝Str(s) ′④
End Sub
A.① B.② C.③ D.④
解析 出错的原因是溢出，程序代码是累加时，s超出了整型的范围。
答案 C
1.某VB应用程序的工程窗口如图所示：
其中的“hello.frm”是( )
A.窗体中标题文字 B.窗体文件名
C.工程文件名 D.可执行文件名
答案 B
2.要在文本框Text1中输入文字“hello”的语句是__________________。
答案 Text1.Text＝”hello”
3.获取文本框Text1中文字内容并赋值给变量s的语句是__________________。
答案 s＝Text1.Text
4.在VB中，在标签Lab上显示文字“你好”的语句是( )
A.Label1.Caption＝”你好”
B.Label1.Width＝”你好”
C.Lab.Text＝”你好”
D.Lab.Caption＝”你好”
答案 D
5.在VB窗体中，某对象的属性窗口如下图所示：
(1)该对象所属的控件类型是______________，对象名称是______________，
(2)若要修改该对象在窗体显示的文字，应修改的属性是______________，
(3)若要编写该对象的鼠标单击事件，则该对象的事件处理过程名称是______________，
(4)若已经编写了(3)中事件处理过程，但在属性窗口中，把该对象的名称修改为“Command1”，程序运行时，会出现的现象是( )
A.”要求对象”错误提示
B.”溢出”错误提示
C.没有任何反应
D.”未找到方法或数据成员”错误提示
答案 (1)CommandButton Cmd1 (2)Caption (3)Cmd1_Click (4)C
6.对于语句abc.Caption＝”你好”，下列理解正确的是( )
A.Caption称为属性值
B.该对象可能是标签、按钮或文本框
C.该语句的作用是将对象属性进行赋值
D.若流程图表示此算法，该语句应该在处理框中
解析 abc称为对象名，Caption是属性名，“你好”是属性值，有Caption属性的对象不可能是文本框。该语句的功能是在abc的对象上显示文字“你好”，因此是输出语句。
答案 C
7.运行如下程序代码，出现了如图所示错误提示，则出错的语句是( )
Private Sub Command1_Click()
Dim a As Integer，b As Integer
Dim c As Integer ′①
a＝Val(Text1.Text) ′②
b＝Val(Text2.Text)
c＝a＋b ′③
Label1.Caption＝”a＋b＝”＋c ′④
End Sub
A.① B.② C.③ D.④
解析 错误提示是类型不匹配，字符串型不能和数值型进行连接或运算。
答案 D
8.某同学用VB编写了一个应用程序，其程序代码窗口如图所示：
下列说法正确的是( )
A.该窗体中共设计了3个事件过程
B.Command1_Click事件过程不具有“算法至少有一个输出”的特征
C.该窗体中肯定加入没有任何对象
D.当前正在编辑的是Command1对象的Click事件
答案 B
9.设计一个计算矩形面积的程序，在文本框Text1中输出计算结果，程序如下：
Private Sub Command1_Click()
Dim a As Integer，b As Integer，s As Single
a＝1：b＝3
s＝a*b
Text1.Caption＝Str(s)
End Sub
运行该程序后，单击按钮Command1，将会出现的错误提示是( )
A.溢出
B.未找到方法或数据成员
C.无效的过程调用或参数
D.子程序或函数未定义
答案 B
课件19张PPT。第5节 对象、属性和事件1.VB工程文件的扩展名是_____，窗体文件的扩展名是_____，生成的可执行文件扩展名是_____。
2.常见基本控件有标签________、_______CommandButton、________TextBox、________ListBox等。
3.常见的对象有窗体_______以及由控件生成的______，如文本框Text1、列表框List1。
4.描述对象的状态和外观，称为对象的______。描述对象的行为和动作，称为对象的______。.vbp.frm.exeLabel按钮文本框列表框Form对象属性方法一、控件和对象的关系
1.控件在窗体中形成对象，一类控件可以生成多个对象，但每个对象的名称必须是唯一的。类似于Flash软件中元件和实例的关系，元件在库中，实例在舞台上。
2.每个对象有宽、高、颜色和显示的文字内容等状态，称为属性，是对象的外观。可以在属性窗口中进行修改，由同一类控件生成的对象，其属性可以不相同。也可以通过程序代码进行修改对象的属性。
3.属性的表示方法：对象名.属性名。如Text1.Text、Label1.
Caption、Command1.Caption。4.对于属性的操作往往有两种，一种是修改属性，一种是把属性值赋给某个变量。5.掌握常见对象的属性名6.一个对象可以发生某些行为或动作，如清除列表框内容，向列表框中添加列表，这些称为对象的方法。如List1.AddItem “列表项”、 List1.Clear。【例1】 在VB中，同一窗体中某两个对象的属性窗口如下图所示。关于这两个对象说法正确的有( )
A.具有相同的背景颜色
B.只能在属性窗口中修改属性值
C.可以把对象Cmd1中的名称改为“Lab1”
D.显示的文字是一样的，因此是由同一类控件产生的对象
解析 本题考核的知识点是对象的属性。对象属性值可以在属性窗口中修改，也可以在程序代码中修改。一个窗口中不允许两个相同的对象名，题图中是两个不同类型的对象。
答案 A
[方法总结] 掌握控件和对象的联系和区别，VB程序语言是面向对象的编程语言。【变式训练】 在文本框Text1中输入了“你好”，实例修改了该对象的属性名称是( )
A.BackColor B.Caption
C.Text D.Height
解析 窗体、按钮和标签上显示文字用Caption属性，程序运行时，都能显示内容，但不能输入修改内容。文本框通过Text属性，既可以输入信息，也可以输出信息。
答案 C二、事件和事件处理过程
1.事件是发生在对象上的过程，通常是由用户在对象上激发的一种动作，如鼠标单击(Click)、窗体加载(Load)和按下某个键(KeyPress)等。
2.事件处理过程是针对某个具体对象某个事件编写的程序代码。【例2】 某VB窗体中，事件窗口如下图所示。则下列说法错误的是( )
A.该窗体中已经编写了2个事件过程
B.当前正在编写的是Cmd1的Click事件
C.运行程序，当前窗体中有对象会显示“用户名”字样
D.仅把窗体中代码“Cmd1_Click”改为“Comand1_Click”，程序运行时，单击按钮也可以执行相应的过程代码解析 本题考核的知识点是事件及事件的处理过程。题图中所示有Cmd1的Click事件和Form的Load事件，从图中所示，当前正在编辑Cmd1的Click事件。Form窗体的Load事件表示窗体装载或打开时就执行，因此会在Labe1对象上显示用户名字样。把对象名称修改后，程序运行时，找不到该对象，不会执行相应代码。
答案 D【变式训练】 例2中的两个事件处理过程名称__________、_________________。
解析 事件处理过程名指某个对象的事件，中间用下划线连接。
答案 Cmd1_Click Form_Load三、程序调试
编写的程序，如果出现语法和逻辑错误，在程序运行时，将会出现相应的错误提示。
1.要求对象。程序代码中出现了某个对象，但在窗体中没有这个对象，或者窗体中的对象修改了名称。
2.未找到方法或数据成员。属性或方法名称错误。
3.类型不匹配。赋值号两边的数据类型不一致。
4.溢出。计算的数值大小超出了整型范围。
5.程序结构出错。如选择结构的格式，For循环中没有Next语句配对，IF结构没有End IF等等
6.子程序未定义。函数名称出错。【例3】 某VB程序运行时出现了错误提示，运行界面和提示信息如下图所示：程序代码如下。
Private Sub Command1_Click()
Dim x As Single
x＝Val(Text1.Text)
Text2.Text＝Sqr(x)
End Sub
则出错错误提示的可能原因是( )
①在文本框Text1中输入了一个负数 ②窗体中缺少文本框Text1 ③窗体中缺少文本框Text2 ④窗体中缺少按钮Command1
⑤Text1对象没有Text属性 ⑥窗体中对象Text2修改为Txt2。
A.①②③ B.②③④ C.②③⑥ D.②④⑥解析 本题考核的知识点是程序的调试。出现的错误提示是要求对象，是程序代码中的对象在窗体中找不到，代码中共涉及到Text1、Text2和Command1三个对象，若没有Command1对象，不能响应他的单击事件。
答案 C
[方法总结] 先从错误原因着手，再去对应错误出处。【变式训练】 在文本框Text1、Text2中输入内容，单击按钮Com-
mand1，在标签Label1、Label2中输出相关信息，代码如下：Private Sub Command1_Click()
Dim a As Integer，b As Integer
a＝Val(Text1.Text) ′①
b＝Val(Text2.Text)
a＝a＋b
b＝a＋b ′②
Label1.Text＝Str(a) ′③
Label2.Caption＝Abs(b) ′④
End Sub程序在运行时出现了如图所示的错误提示，则出错的语句是( )
A.① B.② C.③ D.④
解析 从错误提示信息来看，是对象的属性出现错误。
答案 C
