学 进 程 与 设 计
2．设置多个属性
当对一个对象一次设置多个属性时，With …EndWith 结构可以简 化设置过程。语法如下：
【格式】
With <对象引用>
.<属性 1> = <值 1>
……
.<属性 n> = <值 n>
EndWith
【功能】一次设置指定对象的多个属性值。
例如，上面例子中设置标签 Label1 的多个属性，可以使用
以下语句实现：
with MyForml.Labell
.Enabled=.T. &&控件有效 .Forecolor=RGB（0,0,0） &&黑色文本 .visible=.T. &&控件可见 EndWith
5.4 简单的输入输出程序设计 一、命令按钮的使用
命令按钮控件是使用最多的控件之一，常被用来执行某些代码，如 开始计算、关闭表单等。命令按钮的常用属性，如表 5-4 示。
表 5-4 命令按钮的常用属性
属 性 说 明
Cancel 指定当用户按下 Esc 键时，执行与命令按钮 的 Click 事件相关的代码
Caption 在按钮上显示的文本
DisabledPicture 当按钮失效时，显示的.BMP 文件 DownPicture 当按钮按下时，显示的.BMP 文件 Enabled 能否选择此按钮
备注
教 学 进 程 与 设 计
二、用标签输出信息
标签可以用来显示静态的、不允许用户修改的文本信息。
例如：在表单中显示一个红色楷体 18 磅的文本“Visual
FoxPro程序设计”。
设置标签的 Caption、FontName、ForeColor 的属性值，结果如 图 5-6 所示。运行表单后的结果如图 5-7 所示。
图 5-6 标签控件的属性窗口
图 5-7 运行的表单 三、文本框输入/输出
用来进行文本数据输入的，可以用来向程序输入各种不同类型的数 据，也可以用来作数据的输出。
例如：利用文本框输入球的半径，然后按“计算”按钮，得到
球的体积。
具体操作如下：
（1）打开表单设计器，添加两个文本框控件 Text1 和 Text2，两 个 标 签 控 件 Label1 和 Label2 ， 两 个 命 令 按 钮 Command1 和 Command2，如图 5-8 所示。
（2）设置对象属性。
备注
教 学 进 程 与 设 计
5.5 Visual FoxPro中的事件与方法程序 一、事件
在 Visual FoxPro 中，对象可以响应 50 多种事件，当事件发生 时，将执行包含在事件过程中的全部代码。
事件有的适用于专门控件，有的适用于多种控件。事件的发生大多 由用户操作引发，部分由系统或其他对象引发。
二、方法程序的调用
每一类对象都有特定的方法程序。
【格式】<对象引用>.<方法程序>
【功能】调用对象的方法程序。
下列语句调用方法程序来显示表单，并将焦点设置在命令按钮 Commandl上：
MyForm1.show
MYForm1.command1.setFocus 5.6 用户自定义类
用户从基类派生出子类，并修改或添加子类属性、方法，这样的子 类称为用户自定义类。
一、使用类设计器创建类 1、用“新建类”对话框新建类 2、类设计器
类设计器的用户界面与表单设计器相似，在类设计器中，新类的属 性、事件和方法主要通过属性窗口进行设计、定义和修改。
3、使用用户自定义类
在表单设计器中，有一个“查看类”控件，通过它可以将用户自定义 类控件添加到表单控件工具栏中。
4、将一个表单存为类
可以将一个通用表单模板保存为类，这有助于编制出具有统一界面 的应用程序。
二、编程方式使用类
可以在代码运行中用编程的方式定义类，其基本语法为：
备注
教 学 进 程 与 设 计
DEFINE CLASS Classnamel AS ParentClass [[Object.] PropertyName=eExpression…]
[ADD OBJECT[PROETCTED] ObjectName As ClassName2 [WITH cProperty List]]…
[PROCEDURE Name cStatements ENDPROCEDURE]
ENDDETINE
教学讲授小结：（5 分钟）
本节课着重介绍了表单对象及对象的引用，以及控件与对象的基本 知识，讲解了简单的输入/输出程序设计、事件与方法程序的使用，最后 介绍了 Visual FoxPro 中的自定义类的创建。学生在学习过程中学生应 重点掌握对象的引用、事件与方法程序的使用。
备注
习题作业
1．如何引用对象？
2．如何设置属性，调用方法？
3．类的特性是什么？