第 3章 基本控件与顺序程序设计
2009-11-10
顺序结构程序设计
在事件驱动机制中，由用户激发的某个事件去执行相
应的事件过程。这些事件处理过程之间并无特定的执行顺
序，但每个事件过程内部却包含着三种结构。在顺序结构
中，语句将按照出现的顺序逐条执行。
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.1简单电路。
R1＝ 10欧,R2＝ 20欧,R3
＝ 30欧，电源电压恒定不
变，若开关 S1闭合,S2断
开时，电流表的读数是
0.3A,求 (1)电源电压多大？
(2)当 S1和 S2都断开时，电
流表的读数多大？ (3)当 S1、
S2都闭合时，电流表的读
数是多大？
第 3章 基本控件与顺序程序设计
2009-11-10
变量名 = 表达式
或：
[对象名,] 属性名 = 表达式
赋值语句的含义是,
(1)计算赋值号右边表达式的值；
(2)将此值赋给赋值号左边的标识符代表的变量
或控件属性，作为它的当前值；
(3)该值一直保存到下一次再对它赋值为止。
赋值语句基本含义
第 3章 基本控件与顺序程序设计
2009-11-10
赋值相容
赋值语句中的标识符代表一个存储单元。
执行赋值语句时，如果这个存储单元的结构和
大小能够正确地表示赋值号右边的表达式的值，那
么，就称该赋值语句是赋值相容的。
第 3章 基本控件与顺序程序设计
2009-11-10
数值型与字符串型
1.如果字符串的形式表示数值, 则可将字符串
赋予数值变量 。 也可将数值赋予字符串变量 。
2.如果把非数值形式的字符串赋给数值变量,
则会出现运行错误 。
3.把一个整数赋给一个实变量，将不会出什么
错；
4.当把一个长整数赋给一个单精度变量，就可
能会受示数精度的影响。
第 3章 基本控件与顺序程序设计
2009-11-10
注释语句
格式,‘ 注释内容
撇号
说明：
1,此语句仅起注释作用，不被解释和编译。
2,任何字符（包括汉字）都可以作为注释内容。
3,此语句可放在过程、模块的开头，也可放在执行
语句的后面，但必须是一行中的最后一个语句。
第 3章 基本控件与顺序程序设计
2009-11-10
暂停语句
格式,Stop
说明：
1,可放在过程中的任何地方，用来暂停程序执行，
相当于设置断点。
2,类似于 Run 菜单中的 Break 命令，系统将自动
打开立即窗口（ Debug）,方便程序员调试跟踪程序。
3,调试完毕，生成可执行文件之前，应删去所有的
Stop 语句。
第 3章 基本控件与顺序程序设计
2009-11-10
结束语句
格式,End
说明,
1,通常用来结束程序的执行。
2,程序没有 End 语句，或虽然有，但没执行，运行没有影
响，但不能正常结束。
3,为了保持完整性，程序应该通过 End 语句结束执行。
4,其它用途：
End Sub 结束一个 Sub 过程
End Function 结束一个 Function 过程
End If 结束一个 If 语句块
End Type 结束记录类型定义
End Select 结束情况语句
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮 (CommandButton)控件
命令按钮是最常使用的控件之一。命令按钮最多
设置的属性是 Caption,一般使用属性窗口设置该属性，
以便修改命令按钮的标题。命令按钮最常使用的事件
是 Click。
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮属性
（ 1） （ 名称 ）
在程序中它是识别命令按钮的标识符 。 窗体中第一个建立的
命令缺省名称是 Command1,后续的命令按钮缺省名称分别是
Command2,Command3等 。 名称属性为只读属性 。 只读属性
的含义是, 这样的属性只允许在界面设计时修改, 在程序中
不能修改这样的属性 。
（ 2） Caption属性
Caption属性是字符串类型，是显示在命令按钮上的标题。即
可以在界面设计时通过属性窗口修改，也可以使用代码设置。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Default属性
Default属性是布尔类型, 当命令按钮的 Default属性设置
为 True时, 按回车键等效于用鼠标单击该按钮 。 一个窗体
只能有一个命令按钮的 Default属性设置为 True。 命令按钮
的 Default属性缺省值为 False。
（ 4） Cancel属性
Cancel属性是布尔类型，当命令按钮的 Cancel属性设置为
True时，按 Esc键等效于用鼠标单击该按钮。一个窗体只
能有一个命令按钮的 Cancel属性设置为 True。 命令按钮的
Cancel属性缺省值为 False。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 5） Style属性和 Picture属性
Style属性决定命令按钮的外观, 只能取 0或 1。 当此属性设
置为 0时, 表示标准命令按钮, 该按钮只能显示文字, 并且
不能改变背景颜色和前景颜色, 更不能显示图标 。 当此属
性设置为 1时, 表示图形命令按钮, 图形即能显示文字, 能
改变背景颜色和前景颜色, 也能显示图标 。 命令按钮的
Picture属性同窗体的 Picture属性, 用来显示图形 。
（ 6） ToolTipText属性
ToolTipText属性是字符串类型, 用于设置命令按钮的提示
信息, 运行程序过程中, 若鼠标指向命令按钮并停留时,
显示命令按钮 ToolTipText的字符串 。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 8） Enabled属性
Enabled属性是布尔类型, 用于设置命令按钮是否可以操作,
运行程序时, 若命令按钮的 Enabled属性设置为 False,命令
按钮呈灰色, 此时命令按钮禁止操作 。 当命令按钮的
Enabled属性设置为 True时, 允许用户操作命令按钮 。
（ 9） Visible属性
Visible属性是布尔类型, 用于设置命令按钮是否可见 。
（ 10） 其它属性
命令按钮也有和大小、位置有关的属性，有 Height、
Left,Top和 Width。 不同的是，窗体的 Left和 Top是相对于
屏幕，命令按钮的 Left和 Top是相对于窗体。另外，命令按
钮能够输出文字，因此有与 Font相关的属性。
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.2老师和学生。 设计一个窗体，在窗体上添加两个命令
按钮。运行程序时,,老师, 可以操作,,学生, 不能操作，
单击, 老师, 按钮后, 老师, 不能操作,,学生, 可以操作。
单击, 学生, 后，命令按钮状态恢复成原始状态。用鼠标指
向命令按钮并停留时，显示提示信息。
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮事件
命令按钮它是用户与程序交互的最简便的方法 。 命令按
钮除最常使用的 Click事件 。 命令按钮常用到的事件有：
Mouse Down事件, MouseUp事件, MouseMove 事件等 。
Mouse Down事件
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.3事件顺序。 设计一个窗体，在窗体上添加一个命令
按钮。并编写命令按钮被压下、单击和抬起的事件过程，
在事件过程中输出命令按钮的状态。要求命令按钮被压下
和正常状态分别显示不同图形。
第 3章 基本控件与顺序程序设计
2009-11-10
标签控件
标签控件（ Label） 也称标签或标签框，是最常使用的
控件之一，常用于输出文本，显示提示信息，用标签
控件输出的文本、提示信息不能编辑、修改。所以标
签控件常用来输出标题、显示处理结果或标识那些不
带 Caption属性的控件，如下面讲的 TextBox控件。
第 3章 基本控件与顺序程序设计
2009-11-10
标签控件属性
（ 1） （ 名称 ） 属性
在界面设计时, 用 Name属性设置标签控件的名称 。 随着标签
控件的建立, 系统赋给标签控件的隐含名称为 Label1,Label2
等, 在隐含名称中 Label永远保持不变, 变化的是后边的序号,
能表示出是第几个添加的标签控件 。 在程序中对控件的操作,
都是通过名称来识别对象 。
（ 2） Caption属性
Caption属性是字符串类型，用于设置该标签控件的标题。该
属性值就是标签控件要显示的内容，它既可以在属性窗口中
设定，也可用代码改变控件显示的内容。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Alignment属性
数值型, 用于设置标题的对齐方式, 可设置为 0,1和 2，
其作用分别是,左对齐, 右对齐和 中间对齐 。
（ 4） AutoSize属性
AutoSize属性是布尔类型, 标签的大小是否随标题内容的
大小自动调整 。 当该属性设置为 True时, 标签的大小随标
题内容自动调整, 使标签的大小正好适应标题, 且不换行 。
当该属性设置为 False时, 标签的大小不随标题内容自动调
整, 标题超过标签尺寸的部分不能显示 。 确省值为 False。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 5） BorderStyle属性
数值型, 用于设置边框的样式, 只能取 0或 1,其作用如下：
0－标签无边界线, 确省值 。
1－标签有边界线 。
（ 6） BackStyle属性
数值型, 用于设置背景的样式, 只能取 0或 1,其作用如下：
0－透明显示, 确省值 。
1－不透明显示 。
第 3章 基本控件与顺序程序设计
2009-11-10
文本框 (TextBox)控件
文本框属性
（ 1） Text属性
Text属性是字符串类型，用于设置文本框中显示的文字。该
属性值是文本框要显示的内容，它既可以在属性窗口中设定，
也可用代码改变控件显示的内容。
（ 2） PasswordChar属性
PasswordChar属性是字符串类型，用于设置文本框中显示的
字符，常用于口令输入。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Multiline属性
Multiline属性是布尔类型, 用于设置文本框中是否可以输入
多行文本 。 缺省值是 False,此时文本框中只能输入一行文本 。
当设置该属性为 True时, 文本框可以输入多行文本 。 当该属
性设置为 False时, PasswordChar属性才能发挥作用 。
（ 4） ScrollBars属性
ScrollBars属性是数值型，用于设置文本框中是否有滚动
条，什么样的滚动条。可取值 0,1,2,3，缺省值是 0。
第 3章 基本控件与顺序程序设计
2009-11-10
文本框事件和方法
文本框支持 Click和 DblClick事件, 常用的事件还有：
（ 1） Change事件
在文本框中输入信息或在程序中改变 Text属性值时, 都会触发
该事件 。
（ 2） LostFocus事件
按下 Tab键或用鼠标单击其它对象使焦点离开该文本框时, 触
发该事件 。
（ 3） KeyPree事件
当文本框具有焦点时，按下任意键，都会触发该事件。通常
可用该事件检查输入的字符。
第 3章 基本控件与顺序程序设计
2009-11-10
TextBox控件常用的方法有：
SetFocus方法, 其作用是把焦点设置到指定的对象, 如：
Text1,SetFocus
将使当前窗体中的文本框 text1能够接收键盘输入的字符 。
第 3章 基本控件与顺序程序设计
2009-11-10
综合运用
例 3.6字符和 ASCII
例 3.7相对运动
一平板车，质量 M=100千克，停在水平路面上。车身的平板
离地面的高度 h=1.25米，一质量 m=50千克的小物块置于车
的平板上，它到车尾端的距离 b=1.00米，与车板间的滑动
摩擦系数 u=0.20,如图所示。今对平板车施一水平方向的
恒力，使车向前行驶，结果物块从车板上滑落。物块刚离
开车板的时刻，车向前行驶的距离 S0=2.0米。求物块落地
时，落地点到车尾的水平距离 S。 不计路面与平板车间以及
轮轴之间的摩擦，取 g=9.8米 /秒 2。
2009-11-10
顺序结构程序设计
在事件驱动机制中，由用户激发的某个事件去执行相
应的事件过程。这些事件处理过程之间并无特定的执行顺
序，但每个事件过程内部却包含着三种结构。在顺序结构
中，语句将按照出现的顺序逐条执行。
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.1简单电路。
R1＝ 10欧,R2＝ 20欧,R3
＝ 30欧，电源电压恒定不
变，若开关 S1闭合,S2断
开时，电流表的读数是
0.3A,求 (1)电源电压多大？
(2)当 S1和 S2都断开时，电
流表的读数多大？ (3)当 S1、
S2都闭合时，电流表的读
数是多大？
第 3章 基本控件与顺序程序设计
2009-11-10
变量名 = 表达式
或：
[对象名,] 属性名 = 表达式
赋值语句的含义是,
(1)计算赋值号右边表达式的值；
(2)将此值赋给赋值号左边的标识符代表的变量
或控件属性，作为它的当前值；
(3)该值一直保存到下一次再对它赋值为止。
赋值语句基本含义
第 3章 基本控件与顺序程序设计
2009-11-10
赋值相容
赋值语句中的标识符代表一个存储单元。
执行赋值语句时，如果这个存储单元的结构和
大小能够正确地表示赋值号右边的表达式的值，那
么，就称该赋值语句是赋值相容的。
第 3章 基本控件与顺序程序设计
2009-11-10
数值型与字符串型
1.如果字符串的形式表示数值, 则可将字符串
赋予数值变量 。 也可将数值赋予字符串变量 。
2.如果把非数值形式的字符串赋给数值变量,
则会出现运行错误 。
3.把一个整数赋给一个实变量，将不会出什么
错；
4.当把一个长整数赋给一个单精度变量，就可
能会受示数精度的影响。
第 3章 基本控件与顺序程序设计
2009-11-10
注释语句
格式,‘ 注释内容
撇号
说明：
1,此语句仅起注释作用，不被解释和编译。
2,任何字符（包括汉字）都可以作为注释内容。
3,此语句可放在过程、模块的开头，也可放在执行
语句的后面，但必须是一行中的最后一个语句。
第 3章 基本控件与顺序程序设计
2009-11-10
暂停语句
格式,Stop
说明：
1,可放在过程中的任何地方，用来暂停程序执行，
相当于设置断点。
2,类似于 Run 菜单中的 Break 命令，系统将自动
打开立即窗口（ Debug）,方便程序员调试跟踪程序。
3,调试完毕，生成可执行文件之前，应删去所有的
Stop 语句。
第 3章 基本控件与顺序程序设计
2009-11-10
结束语句
格式,End
说明,
1,通常用来结束程序的执行。
2,程序没有 End 语句，或虽然有，但没执行，运行没有影
响，但不能正常结束。
3,为了保持完整性，程序应该通过 End 语句结束执行。
4,其它用途：
End Sub 结束一个 Sub 过程
End Function 结束一个 Function 过程
End If 结束一个 If 语句块
End Type 结束记录类型定义
End Select 结束情况语句
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮 (CommandButton)控件
命令按钮是最常使用的控件之一。命令按钮最多
设置的属性是 Caption,一般使用属性窗口设置该属性，
以便修改命令按钮的标题。命令按钮最常使用的事件
是 Click。
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮属性
（ 1） （ 名称 ）
在程序中它是识别命令按钮的标识符 。 窗体中第一个建立的
命令缺省名称是 Command1,后续的命令按钮缺省名称分别是
Command2,Command3等 。 名称属性为只读属性 。 只读属性
的含义是, 这样的属性只允许在界面设计时修改, 在程序中
不能修改这样的属性 。
（ 2） Caption属性
Caption属性是字符串类型，是显示在命令按钮上的标题。即
可以在界面设计时通过属性窗口修改，也可以使用代码设置。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Default属性
Default属性是布尔类型, 当命令按钮的 Default属性设置
为 True时, 按回车键等效于用鼠标单击该按钮 。 一个窗体
只能有一个命令按钮的 Default属性设置为 True。 命令按钮
的 Default属性缺省值为 False。
（ 4） Cancel属性
Cancel属性是布尔类型，当命令按钮的 Cancel属性设置为
True时，按 Esc键等效于用鼠标单击该按钮。一个窗体只
能有一个命令按钮的 Cancel属性设置为 True。 命令按钮的
Cancel属性缺省值为 False。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 5） Style属性和 Picture属性
Style属性决定命令按钮的外观, 只能取 0或 1。 当此属性设
置为 0时, 表示标准命令按钮, 该按钮只能显示文字, 并且
不能改变背景颜色和前景颜色, 更不能显示图标 。 当此属
性设置为 1时, 表示图形命令按钮, 图形即能显示文字, 能
改变背景颜色和前景颜色, 也能显示图标 。 命令按钮的
Picture属性同窗体的 Picture属性, 用来显示图形 。
（ 6） ToolTipText属性
ToolTipText属性是字符串类型, 用于设置命令按钮的提示
信息, 运行程序过程中, 若鼠标指向命令按钮并停留时,
显示命令按钮 ToolTipText的字符串 。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 8） Enabled属性
Enabled属性是布尔类型, 用于设置命令按钮是否可以操作,
运行程序时, 若命令按钮的 Enabled属性设置为 False,命令
按钮呈灰色, 此时命令按钮禁止操作 。 当命令按钮的
Enabled属性设置为 True时, 允许用户操作命令按钮 。
（ 9） Visible属性
Visible属性是布尔类型, 用于设置命令按钮是否可见 。
（ 10） 其它属性
命令按钮也有和大小、位置有关的属性，有 Height、
Left,Top和 Width。 不同的是，窗体的 Left和 Top是相对于
屏幕，命令按钮的 Left和 Top是相对于窗体。另外，命令按
钮能够输出文字，因此有与 Font相关的属性。
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.2老师和学生。 设计一个窗体，在窗体上添加两个命令
按钮。运行程序时,,老师, 可以操作,,学生, 不能操作，
单击, 老师, 按钮后, 老师, 不能操作,,学生, 可以操作。
单击, 学生, 后，命令按钮状态恢复成原始状态。用鼠标指
向命令按钮并停留时，显示提示信息。
第 3章 基本控件与顺序程序设计
2009-11-10
命令按钮事件
命令按钮它是用户与程序交互的最简便的方法 。 命令按
钮除最常使用的 Click事件 。 命令按钮常用到的事件有：
Mouse Down事件, MouseUp事件, MouseMove 事件等 。
Mouse Down事件
第 3章 基本控件与顺序程序设计
2009-11-10
例 3.3事件顺序。 设计一个窗体，在窗体上添加一个命令
按钮。并编写命令按钮被压下、单击和抬起的事件过程，
在事件过程中输出命令按钮的状态。要求命令按钮被压下
和正常状态分别显示不同图形。
第 3章 基本控件与顺序程序设计
2009-11-10
标签控件
标签控件（ Label） 也称标签或标签框，是最常使用的
控件之一，常用于输出文本，显示提示信息，用标签
控件输出的文本、提示信息不能编辑、修改。所以标
签控件常用来输出标题、显示处理结果或标识那些不
带 Caption属性的控件，如下面讲的 TextBox控件。
第 3章 基本控件与顺序程序设计
2009-11-10
标签控件属性
（ 1） （ 名称 ） 属性
在界面设计时, 用 Name属性设置标签控件的名称 。 随着标签
控件的建立, 系统赋给标签控件的隐含名称为 Label1,Label2
等, 在隐含名称中 Label永远保持不变, 变化的是后边的序号,
能表示出是第几个添加的标签控件 。 在程序中对控件的操作,
都是通过名称来识别对象 。
（ 2） Caption属性
Caption属性是字符串类型，用于设置该标签控件的标题。该
属性值就是标签控件要显示的内容，它既可以在属性窗口中
设定，也可用代码改变控件显示的内容。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Alignment属性
数值型, 用于设置标题的对齐方式, 可设置为 0,1和 2，
其作用分别是,左对齐, 右对齐和 中间对齐 。
（ 4） AutoSize属性
AutoSize属性是布尔类型, 标签的大小是否随标题内容的
大小自动调整 。 当该属性设置为 True时, 标签的大小随标
题内容自动调整, 使标签的大小正好适应标题, 且不换行 。
当该属性设置为 False时, 标签的大小不随标题内容自动调
整, 标题超过标签尺寸的部分不能显示 。 确省值为 False。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 5） BorderStyle属性
数值型, 用于设置边框的样式, 只能取 0或 1,其作用如下：
0－标签无边界线, 确省值 。
1－标签有边界线 。
（ 6） BackStyle属性
数值型, 用于设置背景的样式, 只能取 0或 1,其作用如下：
0－透明显示, 确省值 。
1－不透明显示 。
第 3章 基本控件与顺序程序设计
2009-11-10
文本框 (TextBox)控件
文本框属性
（ 1） Text属性
Text属性是字符串类型，用于设置文本框中显示的文字。该
属性值是文本框要显示的内容，它既可以在属性窗口中设定，
也可用代码改变控件显示的内容。
（ 2） PasswordChar属性
PasswordChar属性是字符串类型，用于设置文本框中显示的
字符，常用于口令输入。
第 3章 基本控件与顺序程序设计
2009-11-10
（ 3） Multiline属性
Multiline属性是布尔类型, 用于设置文本框中是否可以输入
多行文本 。 缺省值是 False,此时文本框中只能输入一行文本 。
当设置该属性为 True时, 文本框可以输入多行文本 。 当该属
性设置为 False时, PasswordChar属性才能发挥作用 。
（ 4） ScrollBars属性
ScrollBars属性是数值型，用于设置文本框中是否有滚动
条，什么样的滚动条。可取值 0,1,2,3，缺省值是 0。
第 3章 基本控件与顺序程序设计
2009-11-10
文本框事件和方法
文本框支持 Click和 DblClick事件, 常用的事件还有：
（ 1） Change事件
在文本框中输入信息或在程序中改变 Text属性值时, 都会触发
该事件 。
（ 2） LostFocus事件
按下 Tab键或用鼠标单击其它对象使焦点离开该文本框时, 触
发该事件 。
（ 3） KeyPree事件
当文本框具有焦点时，按下任意键，都会触发该事件。通常
可用该事件检查输入的字符。
第 3章 基本控件与顺序程序设计
2009-11-10
TextBox控件常用的方法有：
SetFocus方法, 其作用是把焦点设置到指定的对象, 如：
Text1,SetFocus
将使当前窗体中的文本框 text1能够接收键盘输入的字符 。
第 3章 基本控件与顺序程序设计
2009-11-10
综合运用
例 3.6字符和 ASCII
例 3.7相对运动
一平板车，质量 M=100千克，停在水平路面上。车身的平板
离地面的高度 h=1.25米，一质量 m=50千克的小物块置于车
的平板上，它到车尾端的距离 b=1.00米，与车板间的滑动
摩擦系数 u=0.20,如图所示。今对平板车施一水平方向的
恒力，使车向前行驶，结果物块从车板上滑落。物块刚离
开车板的时刻，车向前行驶的距离 S0=2.0米。求物块落地
时，落地点到车尾的水平距离 S。 不计路面与平板车间以及
轮轴之间的摩擦，取 g=9.8米 /秒 2。
