目的要求 学会表单控件的使用方法。

重点难点 掌握标签控件、图象控件、文本框控件和编辑框控件的使用。

第 11章 表单控件

控件大致可分为 4类：

①输出类：标签，图象，线条，形状。

②输入类：文本框，编辑框，微调控件，列表框，组合框。

③控制类：命令按钮，命令按钮组，复选框，选项按钮组，计时器。

④容器类：表格．页框，Container容器。

11.1 输出类控件

1 标签控件

用于在表单中显示静态文本，如标题等。常用属性：

Caption：设置标签的内容

BackColor：设置背景颜色。

FontName：设置字体。

FontSize：设置字号。

ForeColor：设置字的颜色。

2 图象控件

图像控件允许在表单中添加图片(.bmp文件)。常用的属性：

Picture：要显示的图片(.bmp文件)。

BorderStyle：决定图像是否具有可见的边框。

11.2 输入类控件

1 文本框控件

文本框控件用于显示或输入单行的文本，允许用户编辑。

常用属性：

Value：显示在文本框中的内容

Alignment：用一于指定文本框中内容的对齐方式(左对齐、右对齐、居中或自动对齐)。

InputMask：输入掩码，指定每个字符输入时必须遵守的规则。

PasswordChar：设置保密信息的字符“＊”或其他通用字符

ControlSource: 为控件指定数据源

使用要点：

(l) 检验文本框中的数据是否有效

代码包含在 Valid事件中, 如果值无效，则返回“假”(.F.)或0。 如果用户要显示自己的信息,可以使用 MESSAGEBOX()函数并且返回值。

如：对用户输入的日期进行检查：

IF CTOD(THIS.Value)<DATE()

=MESSAGEBOX("日期输入错误！",I)

RETURE .F.

ELSE

RETURN .T.

ENDIF

(2) 当文本框得到焦点后选择文本

如果想在焦点移动到文本框时选中其中的所有内容，则要将 SelectOnEntry属性设置为“真”(.T.)。

(3) 对文本框中的文本进行格式编排

InputMask属性：确定在文本框中可以键入的值。

Format属性：决定在文本框中值的显示格式。

如：将 InputMask属性设置为999 999.99，则输入的数值只能具有两位小数并必须小于1000000。

(4) 在文本框中接收用户口令

PasswordChar属性：设置为字符“＊”或其他通用字符。

控件与数据绑定：

控件的数据绑定是指将控件与某个数据源联系起来。实现数据绑定需要为控件指定数据源，而数据源则由控件的ControlSource属性来指定。

数据源有字段和变量两种，前者来自数据环境中的表，可以供用户在 ControlSource属性中选用。

例 11.1 建立“学生成绩.SCX”表单，添加标题“学生成绩报告单”，并添加两个文本框分别显示“学生情况”表中的学生姓名和学号字段内容。

操作步骤：

（ 1）新建表单，打开表单设计器

（ 2）添加标签：Label l。修改属性如下：

Caption属性：修改为“学生成绩报告单”

BackColor属性：浅黄色

FontName属性：选择“华文行楷”

FontSize属性：20磅

AutoSize属性：.T.

BackStyle属性: 0-透明

（ 3）添加文本框TEXT1，设置属性：

fontsize=10，

controlsource=“学生成绩.学号”，

alignment=中间，

inputmask=“99999”，其他都使用系统默认属性。

（ 4）添加文本框TEXT2，设置属性（同上）：

controlsource=“学生成绩.科目”

2 编辑框控件

编辑框用于输入或更改多行文本，适用备注型字段。

常用属性 :

HideSelection：指定在编辑框没有获得焦点时，编辑框中被选定的内容是否为可见的。

ControlSource：为控件指定数据源

ReadOnly：指定用户能否修改编辑框中的内容。

使用要点

(1) 编辑框控件与数据的绑定

ControlSource属性：设置为所要绑定的字段名以及该字段所在的表名即可。例如，假设在“学生”表中有一个名为“备注”的备注型字段，可以将编辑框的ControlSource属性设置为“学生.备注”。

(2) 对选定文本进行处理

SelLength属性：确定选中文本的长度。

SelStart属性：确定选中文本的起始位置。

SelText 属性：访问选定的文本

如：在编辑框中选择第 1个单词：

Form l .edtText.SelStart=0

Form l .edtText.SelLength=AT(""ml.edtText.Text) －1

将选定文本全部变为大写：

Form l.edtText.SelText=UPPER(Forml.edtText.SelText)

编辑框与文本框的主要差别：

①编辑框只能编辑字符型数据；而文本框则适用于C、N、D、L4种类型。

②文本框只能户键入一段数据；而编辑框则能输入多段文本。

，默认值为 Textl，如果在列中添加了一个控件，则可以将它指定为CurrentControl。