VF教程_表单设计与应用

1、LOGO 1 第第7 7章章 表单设计与应用表单设计与应用 第第7章章 表单设计与应用表单设计与应用2 本章内容 面向对象程序设计的概念面向对象程序设计的概念 7.1 创建表单创建表单 7.2 表单设计器表单设计器 7.3 表单的属性、事件和方法表单的属性、事件和方法 7.4 基本型控件基本型控件 7.3 容器型控件容器型控件 7.4 第第7章章 表单设计与应用表单设计与应用3 v表单是程序界面，对话框和窗口表单是程序界面，对话框和窗口 第第7章章 表单设计与应用表单设计与应用4 v表单是表单是面向对象面向对象程序设计思想在程序设计思想在VFPVFP中的体现中的体现 对象：现实世界中的任何实体

2、都可以认为是对象对象：现实世界中的任何实体都可以认为是对象 对象的三要素对象的三要素 属性：用来描述对象的状态，是对象的静态物理特征属性：用来描述对象的状态，是对象的静态物理特征 事件：一种预先定义好的能被对象识别和响应的动作事件：一种预先定义好的能被对象识别和响应的动作 方法：用来描述对象的行为过程方法：用来描述对象的行为过程 VFPVFP中的对象中的对象 表单是对象表单是对象 组合框是对象组合框是对象 命令按钮是对象命令按钮是对象 列表框是对象列表框是对象 标签是对象标签是对象 第第7章章 表单设计与应用表单设计与应用5 类的概念 v类是具有相同或相似性质的对象的抽象，也就是类是具有相同或

3、相似性质的对象的抽象，也就是 说类是具有相同属性、共同方法的对象的集合说类是具有相同属性、共同方法的对象的集合 v类是对象的抽象，对象是类的具体化，是类的实类是对象的抽象，对象是类的具体化，是类的实 例例 v所有的属性、事件和方法都是由类定义的所有的属性、事件和方法都是由类定义的 第第7章章 表单设计与应用表单设计与应用6 汽车 一辆红色小汽车一辆红色小汽车 类和对象的关系类和对象的关系: : 这是一个对象这是一个对象 ，因为它是指一辆具体的汽车实，因为它是指一辆具体的汽车实 体，该对象的属性为红色、小型等体，该对象的属性为红色、小型等 这是一个类这是一个类 不专指特定的事物不专指特定的事物

4、第第7章章 表单设计与应用表单设计与应用7 7.1 7.1 面向对象程序设计的概念面向对象程序设计的概念 v对象的访问和调用对象的访问和调用 容器与控件对象容器与控件对象 vThisform.Command1,Thisform,This.ParentThisform.Command1,Thisform,This.Parent 第第7章章 表单设计与应用表单设计与应用8 7.2 创建表单 使用表单向导创建表单使用表单向导创建表单 1 使用表单设计器创建表单使用表单设计器创建表单 2 第第7章章 表单设计与应用表单设计与应用9 v使用表单向导创建表单使用表单向导创建表单 【例例7.17.1】利用表

5、单向导为数据表利用表单向导为数据表“学生学生.dbf”.dbf”创建单创建单 表表单，表单标题为表表单，表单标题为“学生信息管理学生信息管理”，表单文件名，表单文件名 为为“学生管理学生管理.SCX”.SCX”，按学号升序排列。，按学号升序排列。 7.2 创建表单 第第7章章 表单设计与应用表单设计与应用10 v使用表单设计器创建表单使用表单设计器创建表单 “文件文件”“新建新建” CREATE FORM CREATE FORM 7.2 创建表单 第第7章章 表单设计与应用表单设计与应用11 v修改表单修改表单 “文件文件”“打开打开” MODIFY FORM MODIFY FORM MODI

6、FY FORM MODIFY FORM 学生情况学生情况.scx.scx v表单的保存和运行表单的保存和运行 保存表单保存表单 （表单文件扩展名：（表单文件扩展名：.scx.scx） 运行表单（多种方法）运行表单（多种方法） 7.2 创建表单 第第7章章 表单设计与应用表单设计与应用12 7.3控件的操作与布局 对于表单上的控件对于表单上的控件 可以进行以下操作可以进行以下操作 选择控件选择控件 移动控件移动控件 缩放控件缩放控件 复制控件复制控件 删除控件删除控件 控件对齐控件对齐 设置设置Tab键次序键次序 第第7章章 表单设计与应用表单设计与应用13 7.3.3 数据环境 向数据环境添加

7、表或视图：向数据环境添加表或视图： 右键单击右键单击“数据环境设计器窗口数据环境设计器窗口”，然后在弹出，然后在弹出 的快捷菜单中选择的快捷菜单中选择【添加添加】命令命令 从数据环境中移去表或视图：从数据环境中移去表或视图： 右键单击要移去的表或视图，然后在弹出的快捷右键单击要移去的表或视图，然后在弹出的快捷 菜单中选择菜单中选择【移去移去】命令命令 第第7章章 表单设计与应用表单设计与应用14 7.4.1 定义表单外观的属性 AlwaysOnTopAlwaysOnTop属性属性 该属性设置表单在多个窗口时的层次。该属性设置表单在多个窗口时的层次。 为真（为真（.T.T.）时：本表单总在窗口的

8、最前面，不会被其他窗口遮）时：本表单总在窗口的最前面，不会被其他窗口遮 盖。为假（盖。为假（.F.F.）时：本表单可以被其他窗口所遮盖。）时：本表单可以被其他窗口所遮盖。 AutoCenterAutoCenter属性属性 决定表单在决定表单在VFVF窗口中的位置是否剧中窗口中的位置是否剧中 BackColorBackColor属性属性 该属性设置表单窗口的背景颜色该属性设置表单窗口的背景颜色 BorderStyleBorderStyle属性属性 指定表单边框样式。指定表单边框样式。0 0：无边框。：无边框。1 1：单线边框。：单线边框。2 2：固定对话框。：固定对话框。 3 3：可调边框（默认

9、值）：可调边框（默认值） CaptionCaption属性属性 表单标题栏显示文本内容。可以在表单属性窗口中设置，也可以表单标题栏显示文本内容。可以在表单属性窗口中设置，也可以 用命令语句设置用命令语句设置 第第7章章 表单设计与应用表单设计与应用15 7.4.1 定义表单行为的属性 Closable属性属性 表单标题栏上的关闭按钮是否有效。表单标题栏上的关闭按钮是否有效。 为真（为真（.T.）时：关闭按钮有效，可以关闭表单。）时：关闭按钮有效，可以关闭表单。 为假（为假（.F.）时：关闭按钮无效，不能关闭表单。关闭表单选择）时：关闭按钮无效，不能关闭表单。关闭表单选择“文件文件关闭关闭” M

10、axButton属性属性 为真（为真（.T.）时：最大化按钮有效，可以将表单最大化或还原表单大小。）时：最大化按钮有效，可以将表单最大化或还原表单大小。 为假（为假（.F.）时：最大化按钮无效，不可以最大化表单。）时：最大化按钮无效，不可以最大化表单。 MinButton属性属性 为真（为真（.T.）时：最小化按钮有效，可将表单最小化显示在任务栏处。）时：最小化按钮有效，可将表单最小化显示在任务栏处。 为假（为假（.F.）时：最小化按钮无效，不能将表单最小化。）时：最小化按钮无效，不能将表单最小化。 Movable属性属性 运行时，用户是否能够移动表单。运行时，用户是否能够移动表单。 为真（为

11、真（.T.）时：能移动表单。）时：能移动表单。 为假（为假（.F.）时：不能移动表单。）时：不能移动表单。 第第7章章 表单设计与应用表单设计与应用16 7.4.1 表单其他属性 ShowWindow属性属性 指定一个表单或工具栏是否是顶层表单或是子表单指定一个表单或工具栏是否是顶层表单或是子表单 0：在屏幕中（默认值）：在屏幕中（默认值） 1：在顶层表单中：在顶层表单中 2：作为顶层表单：作为顶层表单 WindowType属性属性 表单的模式状态。表单的模式状态。 0：非模式表单，在应用程序中，在关闭运行的非模式：非模式表单，在应用程序中，在关闭运行的非模式 表单之前，可以访问程序中的其他界

12、面元素。表单之前，可以访问程序中的其他界面元素。 1：模式表单，在应用程序中，在关闭运行的模式表单：模式表单，在应用程序中，在关闭运行的模式表单 之前，不能访问程序中的其他界面元素。之前，不能访问程序中的其他界面元素。 第第7章章 表单设计与应用表单设计与应用17 7.4.2 表单常用方法 （1 1）RefreshRefresh方法方法：刷新表单。：刷新表单。 （2 2）ReleaseRelease方法方法：将表单从内存中释放。表单运行时，用：将表单从内存中释放。表单运行时，用 户单击表单右上角的关闭按钮，系统会自动执行户单击表单右上角的关闭按钮，系统会自动执行RelaseRelase方方 法

13、。法。 （3 3）ShowShow方法方法：显示表单。该方法将表单的：显示表单。该方法将表单的VisibleVisible属性设属性设 置为置为.T.T.。 （4 4）HideHide方法方法：隐藏表单。该方法将表单的：隐藏表单。该方法将表单的VisibleVisible属性设属性设 置为置为.F.F.。与。与RelaseRelase方法不同，方法不同，HideHide只是把表单隐藏，但只是把表单隐藏，但 并不将表单从内存释放，之后可用并不将表单从内存释放，之后可用ShowShow方法重新显示表单。方法重新显示表单。 （5 5）SetFocusSetFocus方法方法 使控件获得焦点，从而成为

14、活动对象。当该控件的使控件获得焦点，从而成为活动对象。当该控件的VisibleVisible 属性值或属性值或EnabledEnabled属性值为属性值为.F.F.时，将不能获得焦点时，将不能获得焦点. . 第第7章章 表单设计与应用表单设计与应用18 7.4.2 表单常用事件 ClickClick事件事件 用户在某个对象上单击鼠标时，触发该事件。用户在某个对象上单击鼠标时，触发该事件。 DbClickDbClick事件事件 鼠标双击对象时触发该事件。鼠标双击对象时触发该事件。 RightClickRightClick事件事件 鼠标右键单击对象时触发该事件。鼠标右键单击对象时触发该事件。 In

15、itInit事件事件 创建对象时触发。创建对象时触发。控件控件InitInit事件事件在表单在表单InitInit事件事件前前引发，因引发，因 此在表单此在表单InitInit事件代码中访问它所包含的所有控件对象。事件代码中访问它所包含的所有控件对象。 DestroyDestroy事件事件 当释放一个对象时触发。当释放一个对象时触发。表单表单DestroyDestroy事件事件在控件在控件DestroyDestroy事事 件引发之件引发之前前引发。引发。 因此能够在表单对象的因此能够在表单对象的DestroyDestroy事件代事件代 码中访问它所包含的所有控件对象。码中访问它所包含的所有控件

16、对象。 第第7章章 表单设计与应用表单设计与应用19 7.4.2 表单常用事件 LoadLoad事件事件 对象创建之前引发。对象创建之前引发。 在运行表单时，先引发在运行表单时，先引发LoadLoad事件，然后引发事件，然后引发InitInit事件。事件。 UnloadUnload事件事件 释放表单时触发。它是释放表单对象时释放表单时触发。它是释放表单对象时最后一个触发的事件最后一个触发的事件。 GotFocusGotFocus事件事件 当表单通过用户操作或以代码方式得到焦点时触发。当表单通过用户操作或以代码方式得到焦点时触发。 运行表单引发事件顺序：运行表单引发事件顺序： Load控件的控件

17、的Init表单的表单的Init 释放表单引发事件顺序：释放表单引发事件顺序： 表单的表单的Destory控件的控件的Destory 表单的表单的Unload 第第7章章 表单设计与应用表单设计与应用20 7.4 表单的属性、事件和方法 v创建新的属性和方法创建新的属性和方法 创建新属性创建新属性 创建新方法创建新方法 第第7章章 表单设计与应用表单设计与应用21 7.4 表单的属性、事件和方法 v创建新的属性和方法创建新的属性和方法 【例例7.57.5】新建一个表单，在该表单中添加一个名为新建一个表单，在该表单中添加一个名为newnew 的方法，方法代码为：的方法，方法代码为：wait new

18、 windowswait new windows。 第第7章章 表单设计与应用表单设计与应用22 7.5 基本型控件 v标签控件标签控件 CaptionCaption属性属性 设置标签控件标题所显示的文本信息设置标签控件标题所显示的文本信息 AlignmentAlignment属性属性 设定标签控件中的文本显示的对齐方式设定标签控件中的文本显示的对齐方式 【例例7.6】表单上添加一个标签（表单上添加一个标签（Label1），）， 标签上显示标签上显示“欢迎使用欢迎使用”，字体颜色为红色，字体颜色为红色 （ForeColor=255,0,0），），18号字，黑体号字，黑体 第第7章章 表单设计与

19、应用表单设计与应用23 7.5 基本型控件 v命令按钮控件命令按钮控件 CaptionCaption属性属性 指定对象的标题文本内容指定对象的标题文本内容 访问键访问键: :退出退出(E) (E) ThisForm.Command1.Caption=ThisForm.Command1.Caption=退出退出(E)(E) DefaultDefault属性属性 指定按下指定按下ENTERENTER键时，哪个命令按钮响应键时，哪个命令按钮响应 在一个表单中，只能有一个命令按钮的在一个表单中，只能有一个命令按钮的DefaultDefault属性值为属性值为.T. .T. CancelCancel属性

20、属性 指定按下指定按下ESCESC键时，哪个命令按钮响应键时，哪个命令按钮响应 在一个表单中，只能有一个在一个表单中，只能有一个CancelCancel属性值为属性值为.T. .T. 第第7章章 表单设计与应用表单设计与应用24 7.5 基本型控件 v命令按钮控件命令按钮控件 【例例7.77.7】新建一个表单文件新建一个表单文件myform.scxmyform.scx，其中包含，其中包含2 2个命令按钮，标题个命令按钮，标题 为为“OK”OK”、“Cancel”Cancel”。如图所示。将。如图所示。将“OK”OK”按钮设置为确认按钮，即按钮设置为确认按钮，即 通过按通过按“Enter”Ent

21、er”可以选择该按钮，并将其宽度设为可以选择该按钮，并将其宽度设为6060。“Cancel”Cancel”按钮按钮 的第的第1 1个字母个字母C C设置成设置成“访问键访问键”即通过按即通过按Alt+CAlt+C就可以选择该按钮。单击就可以选择该按钮。单击 “Cancel”Cancel”按钮，关闭并释放表单。按钮，关闭并释放表单。 新建表单，添加新建表单，添加2个命令按钮个命令按钮 属性设置属性设置 编写代码编写代码 “OK”按钮的按钮的Click事件代码：事件代码： Thisform.Caption=“确认确认” “Cancel”按钮的按钮的Click事件代码：事件代码： Thisform.

22、Release 第第7章章 表单设计与应用表单设计与应用25 7.5 基本型控件 v文本框控件文本框控件 文本框控件（文本框控件（TextText）用于显示文本，也用于编辑文本）用于显示文本，也用于编辑文本 ControlSourceControlSource属性属性 指定与对象建立联系的数据源指定与对象建立联系的数据源: :字段或内存变量字段或内存变量 ValueValue属性属性 指定或返回文本框中的当前内容，默认为空串指定或返回文本框中的当前内容，默认为空串 可以接收任意类型数据可以接收任意类型数据 非数字字符型数据或数值型数据时，直接输入非数字字符型数据或数值型数据时，直接输入 数字字

23、符型数据，数据两端要字符定界符数字字符型数据，数据两端要字符定界符 表达式的值，以等号引导表达式的值，以等号引导 第第7章章 表单设计与应用表单设计与应用26 7.5 基本型控件 v文本框控件文本框控件 PasswordCharPasswordChar属性属性 指定文本框控件内是显示用户输入的字符还是显示占位符指定文本框控件内是显示用户输入的字符还是显示占位符 InputMaskInputMask属性属性 指定在文本框控件中如何输入和显示数据，由模式符组成指定在文本框控件中如何输入和显示数据，由模式符组成 ReadOnlyReadOnly属性属性 指定用户能否修改编辑框中的文本内容指定用户能否

24、修改编辑框中的文本内容 为真（为真（.T.T.）时，用户不能修改编辑框中的内容）时，用户不能修改编辑框中的内容 为假（为假（.F.F.）时，用户可以修改编辑框中的内容。默认值）时，用户可以修改编辑框中的内容。默认值 该文本框的该文本框的PasswordChar属性为属性为 “*” 第第7章章 表单设计与应用表单设计与应用27 7.5 基本型控件 v文本框控件文本框控件 【例例7.8】建立如图建立如图7.48所示表单。表单文件名和标题名均为所示表单。表单文件名和标题名均为“文本框使用文本框使用”。 在操作数在操作数1（Label1）和操作数）和操作数2（Label2）下的）下的2个文本框个文本框

25、(分别为分别为Text1和和 Text2)中只能接收数字、正负号和空格，宽度为中只能接收数字、正负号和空格，宽度为5，“计算计算”按钮的初始状态为按钮的初始状态为 不可用，当运行表单后，其状态为可用。单击不可用，当运行表单后，其状态为可用。单击“退出退出”按钮关闭并释放表单，按钮关闭并释放表单， 运行结果如图运行结果如图7.49所示。所示。 （1）新建表单，添加）新建表单，添加2个标签、个标签、2个文本框、个文本框、2个命令按钮。个命令按钮。 （2）属性设置）属性设置 （3）编写代码。）编写代码。 Form1的的Init事件代码：事件代码： Thisform.Command1.Enabled=

26、.T. “退出退出”按钮的按钮的Click事件代码：事件代码： Thisform.Release 第第7章章 表单设计与应用表单设计与应用28 7.6 容器型控件 v表格控件表格控件 表格是一个可与数据绑定的容器控件，由若干列对象组成，列表格是一个可与数据绑定的容器控件，由若干列对象组成，列 包含标头和控件，列拥有自己的属性、事件和方法。包含标头和控件，列拥有自己的属性、事件和方法。 ColumnCountColumnCount属性属性 指定表格列对象的数目。该属性默认值为指定表格列对象的数目。该属性默认值为-1-1，此时表格将创建足，此时表格将创建足 够多的列来显示数据源中的所有字段。够多的

27、列来显示数据源中的所有字段。 RecordSourceTypeRecordSourceType属性和属性和RecordSourceRecordSource属性属性 RecordSourceRecordSource属性为记录源属性为记录源 RecordSourceTypeRecordSourceType属性为记录源类型属性为记录源类型 第第7章章 表单设计与应用表单设计与应用29 7.6 容器型控件 v表格控件表格控件 表格基本操作表格基本操作 通过设置表格的通过设置表格的HeaderHeightHeaderHeight和和RowHeightRowHeight属性调整行高，设置属性调整行高，设置

28、 列对象的列对象的WidthWidth属性调整列宽属性调整列宽 当表格处于编辑状态下，用鼠标拖动调整表格的行高和列宽当表格处于编辑状态下，用鼠标拖动调整表格的行高和列宽 使用表格生成器设计表格使用表格生成器设计表格 第第7章章 表单设计与应用表单设计与应用30 7.6 容器型控件 v表格控件表格控件 【7.187.18】修改修改【例例7.177.17】的选课查询表单，添加一个表的选课查询表单，添加一个表 格，将查询的结果显示在表格中格，将查询的结果显示在表格中 1.表格表格RecordSourceType属性值为属性值为“4-SQL说明说明” 2.“查询查询”按钮的按钮的Click事件代码：事

29、件代码： xh=Alltrim(ThisForm.Text1.Value) kch=Alltrim(ThisForm.Text2.Value) IF ThisForm.OptionGroup1.Value=1 ThisForm.Grid1.RecordSource=SELE * FROM; 选课选课 WHERE 学号学号=xh INTO CURSOR tmp ELSE ThisForm.Grid1.RecordSource=SELE * FROM; 选课选课 WHERE课程号课程号=kch INTO CURSOR tmp ENDIF 第第7章章 表单设计与应用表单设计与应用31 7.5 基本型

30、控件 v列表框控件列表框控件 列表框（列表框（ListBoxListBox）控件包含一个选项列表，用户可以）控件包含一个选项列表，用户可以 从列表中选择各个选项从列表中选择各个选项 RowSourceTypeRowSourceType属性属性 指定列表框中列表项的数据源类型指定列表框中列表项的数据源类型 RowSourceRowSource属性属性 指定列表框中列表项的数据源指定列表框中列表项的数据源 第第7章章 表单设计与应用表单设计与应用32 7.5 基本型控件 v列表框控件列表框控件 ListList属性属性 用字符串数组用字符串数组ListList来存取列表框控件中的各个数据项来存取列

31、表框控件中的各个数据项 设计时不可用设计时不可用 读取列表框中第读取列表框中第4 4行第行第2 2列的数据项列的数据项“徐建军徐建军”并在文本框显示：并在文本框显示： Thisform.Text1.Value=Thisform.List1.List (4,2)Thisform.Text1.Value=Thisform.List1.List (4,2) 将列表框中将列表框中“王平王平”的性别设置成的性别设置成“男男”： Thisform.List1.List(1,3)=Thisform.List1.List(1,3)=男男 ListCountListCount属性属性 统计列表框中列表项的数目统

32、计列表框中列表项的数目 Val=Thisform.List1.ListCountVal=Thisform.List1.ListCount 则变量则变量valval值为值为8 8 第第7章章 表单设计与应用表单设计与应用33 7.5 基本型控件 v列表框控件列表框控件 ColumnCountColumnCount属性属性 指定列表框的列数指定列表框的列数 ValueValue属性属性 该属性为只读，返回列表框选中的列表项该属性为只读，返回列表框选中的列表项 该属性可以是字符型，也可以是数值型该属性可以是字符型，也可以是数值型: : 如果是字符型，返回的是被选中条目本身内容如果是字符型，返回的是被

33、选中条目本身内容 如果是数值型，则返回选中条目在列表框中的次序号如果是数值型，则返回选中条目在列表框中的次序号 ControlSourceControlSource属性属性 用户通过该属性指定一个字段或变量用来保存用户从列表框中用户通过该属性指定一个字段或变量用来保存用户从列表框中 选择的结果选择的结果 SelectedSelected属性属性 指定列表框内某个列表项是否处于选定状态。逻辑型数组指定列表框内某个列表项是否处于选定状态。逻辑型数组 第第7章章 表单设计与应用表单设计与应用34 7.5 基本型控件 v列表框控件列表框控件 MultiSelectMultiSelect属性属性 指定用

34、户能否在列表框内进行多重选择，以及如何进行多重选指定用户能否在列表框内进行多重选择，以及如何进行多重选 择择 【例【例7.11】在在Form1表单中，添加表单中，添加1个个 列表框，名称为列表框，名称为List1，高度为，高度为120，设，设 置列表框的相关属性，使得当单击列表置列表框的相关属性，使得当单击列表 框中的学号后，在文本框中显示该学生框中的学号后，在文本框中显示该学生 的相关信息，如图所示。的相关信息，如图所示。 第第7章章 表单设计与应用表单设计与应用35 7.5 基本型控件 v操作步骤如下：操作步骤如下： 新建表单，添加新建表单，添加1 1个列表框，个列表框，4 4个标签，个标

35、签，4 4个文本框。个文本框。 属性设置。属性设置。 编写代码：编写代码： “列表框列表框”的的ClickClick事件代码：事件代码： ThisForm.Refresh ThisForm.Refresh 第第7章章 表单设计与应用表单设计与应用36 7.5 基本型控件 v组合框控件组合框控件 组合框（组合框（ComboBoxComboBox）控件结合了列表框和文本框控件）控件结合了列表框和文本框控件 的特点的特点 列表框的属性大部分也适用于组合框列表框的属性大部分也适用于组合框 StyleStyle属性：决定组合框样式属性：决定组合框样式 0 0：下拉组合框。用户既可以从列表中选择内容，也可

36、以在编：下拉组合框。用户既可以从列表中选择内容，也可以在编 辑区输入内容。辑区输入内容。 2 2：下拉列表框。用户只能从列表中选择内容。：下拉列表框。用户只能从列表中选择内容。 第第7章章 表单设计与应用表单设计与应用37 7.5 基本型控件 v组合框控件组合框控件 【例例7.127.12】新建表单新建表单oneone，添加，添加1 1个组合框（个组合框（Combo1Combo1），将其设置为下拉），将其设置为下拉 列表框，设置组合框的相关属性，使其显示的条目为列表框，设置组合框的相关属性，使其显示的条目为“外语外语”、“物物 理理”、“计算机计算机”，向表单中添加两个命令按钮，其标题分别为，

37、向表单中添加两个命令按钮，其标题分别为“统统 计计”、“退出退出”，为表单的，为表单的“统计统计”按钮编写一条按钮编写一条SQLSQL命令，执行该命令命令，执行该命令 时，将统计时，将统计“学生表学生表”所有专业与组合框中指定的内容相同的学生信息所有专业与组合框中指定的内容相同的学生信息 全部显示出来，单击全部显示出来，单击“退出退出”按钮关闭并释放表单。按钮关闭并释放表单。 属性设置如下：属性设置如下： “统计统计”按钮的按钮的Click事件代码：事件代码： SELECT * FROM 学生学生 WHERE 专业专业=ThisForm.Combo1.Value 第第7章章 表单设计与应用表单

38、设计与应用38 7.5 基本型控件 v组合框控件组合框控件 【例例7.137.13】设计一个选课录入表单，表单运行时，在左侧的列表框中选设计一个选课录入表单，表单运行时，在左侧的列表框中选 择学生的学号，然后在右侧的下拉组合框中选择课程号，最后单击择学生的学号，然后在右侧的下拉组合框中选择课程号，最后单击“增增 加选课记录加选课记录”按钮，将所选内容插入到按钮，将所选内容插入到“选课选课”表中。表中。 部分控件属性设置如下：部分控件属性设置如下： “增加选课记录增加选课记录”按钮的按钮的Click事件代码：事件代码： xh=ThisForm.List1.Value kch=ThisForm.C

39、ombo1.Value LOCATE FOR 学号学号=xh AND 课程号课程号=kch IF NOT FOUND() INSERT INTO 选课选课(学号学号,课程号课程号) VALUES(xh,kch) ENDIF 第第7章章 表单设计与应用表单设计与应用39 7.5 基本型控件 v编辑框控件编辑框控件 用来输入、编辑字符型数据用来输入、编辑字符型数据 当编辑的内容大于当编辑的内容大于255255个字符时，只能用编辑框控件个字符时，只能用编辑框控件 ScrollBarsScrollBars属性属性 指定编辑框是否有滚动条指定编辑框是否有滚动条 00没有滚动条没有滚动条 22有垂直滚动条

40、有垂直滚动条 （默认值）（默认值） SelStartSelStart属性属性 返回用户在编辑框的文本输入区所选定的文本的起始点位置返回用户在编辑框的文本输入区所选定的文本的起始点位置 有效取值范围在有效取值范围在0 0与编辑区中的字符总数之间与编辑区中的字符总数之间 设计时不可用设计时不可用 还适用于文本框、组合框等控件还适用于文本框、组合框等控件 第第7章章 表单设计与应用表单设计与应用40 7.5 基本型控件 v编辑框控件编辑框控件 SelLengthSelLength属性属性 返回用户在编辑框的文本输入区选定的字符的数目返回用户在编辑框的文本输入区选定的字符的数目 若没有文本被选定，则返

41、回若没有文本被选定，则返回0 0 设计时不可用设计时不可用 SelTextSelText属性属性 返回用户在编辑框的文本输入区选定的文本返回用户在编辑框的文本输入区选定的文本 若没有选定任何文本，则返回若没有选定任何文本，则返回0 0长度字符串长度字符串 若将若将SelTextSelText属性设置为一个新值，则该新值将替换编辑区中属性设置为一个新值，则该新值将替换编辑区中 选定的文本，并且选定的文本，并且SelLengthSelLength属性值变为属性值变为0 0。 设计时不可用设计时不可用 第第7章章 表单设计与应用表单设计与应用41 7.5 基本型控件 v编辑框控件编辑框控件 【例例7

42、.97.9】表单内包含表单内包含1 1个文本框、个文本框、1 1个编辑框、个编辑框、2 2个命令按钮，所个命令按钮，所 有控件中显示的文字为有控件中显示的文字为2020号字，当单击号字，当单击“查找查找”按钮时，在编辑按钮时，在编辑 框中查找字符串框中查找字符串“VFP”VFP”，如图，如图7.507.50所示。单击所示。单击“替换替换”按钮时，按钮时， 将文本框中内容替换编辑框中查找的内容，如图将文本框中内容替换编辑框中查找的内容，如图7.517.51所示。所示。 第第7章章 表单设计与应用表单设计与应用42 7.5 基本型控件 v编辑框控件编辑框控件 新建表单。添加新建表单。添加1 1个编

43、辑框，个编辑框，1 1个文本框，个文本框，2 2个命令按钮个命令按钮 属性设置属性设置 编写代码编写代码 “查找查找”按钮的按钮的Click事件代码：事件代码： n=at(VFP,Thisform.Edit1.Value) IF n0 Thisform.Edit1.SelStart=n-1 Thisform.Edit1.SelLength=LEN(VFP) ENDIF “替换替换”按钮的按钮的Click事件代码：事件代码： IF Thisform.Edit1.SelText=VFP Thisform.Edit1.SelText=Thisform.Text1.Value ENDIF 第第7章章

44、表单设计与应用表单设计与应用43 7.5 基本型控件 v复选框控件复选框控件 复选框（复选框（CheckBoxCheckBox）用于标记逻辑真（）用于标记逻辑真（.T.T.）和逻辑假）和逻辑假 （.F.F.）两值状态）两值状态 CaptionCaption属性属性 用来设置复选框旁边显示的文字信息用来设置复选框旁边显示的文字信息 ValueValue属性属性 指定复选框的当前状态。该属性值有三种情况：指定复选框的当前状态。该属性值有三种情况： 为为0 0或或.F.F.：默认值，表示复选框未被中：默认值，表示复选框未被中 为为1 1或或.T.T.：表示复选框被选定：表示复选框被选定 为为2 2或

45、或.NULL.NULL.：不确定（只在代码中有效）：不确定（只在代码中有效） ControlSourceControlSource属性属性 指定与复选框建立联系的数据源指定与复选框建立联系的数据源 第第7章章 表单设计与应用表单设计与应用44 7.5 基本型控件 v复选框控件复选框控件 【例例7.107.10】新建一个如图新建一个如图7.527.52所示的表单名和文件名均为所示的表单名和文件名均为myformmyform的表单，的表单， 表单中有两个命令按钮，标题分别为表单中有两个命令按钮，标题分别为“生成表生成表”、“退出退出”，两个复选，两个复选 框，标题分别为框，标题分别为“专业专业”、

46、“入学成绩入学成绩”。单击。单击“生成表生成表“按钮，程序按钮，程序 功能是根据表单运行时复选框选定的字段内容生成新表，如果两个复选功能是根据表单运行时复选框选定的字段内容生成新表，如果两个复选 框都被选中，生成的自由表名为框都被选中，生成的自由表名为two.dbftwo.dbf，two.dbftwo.dbf表中包含表中包含“学生学生”表表 中的学号、姓名、专业、入学成绩；如果只选中中的学号、姓名、专业、入学成绩；如果只选中“专业专业”复选框，生成复选框，生成 的自由表名为的自由表名为one1.dbfone1.dbf，该表包含，该表包含“学生学生”表中的学号、姓名、专业，表中的学号、姓名、专业

47、， 如果只选中如果只选中“入学成绩入学成绩”复选框，生成的自由表名为复选框，生成的自由表名为one2.dbfone2.dbf，该表包，该表包 含含“学生学生”表中的学号、姓名、入学成绩。表中的学号、姓名、入学成绩。“退出退出”按钮关闭并释放表按钮关闭并释放表 单。单。 第第7章章 表单设计与应用表单设计与应用45 7.5 基本型控件 v复选框控件复选框控件 （1 1）新建表单，添加）新建表单，添加2 2个复选框，个复选框，2 2个命令按钮个命令按钮 （2 2）属性设置）属性设置 （3 3）编写代码）编写代码 “生成表生成表”按钮的按钮的Click事件代码：事件代码： IF ThisForm.C

48、heck1.Value=1 And ThisForm.Check2.Value=1 SELECT 学号学号,姓名姓名,专业专业,入学成绩入学成绩 FROM 学生学生 INTO TABLE TWO ENDIF IF ThisForm.Check1.Value=1 And ThisForm.Check2.Value=0 SELECT 学号学号,姓名姓名,专业专业 FROM 学生学生 INTO TABLE ONE1 ENDIF IF ThisForm.Check1.Value=0 And ThisForm.Check2.Value=1 SELECT 学号学号,姓名姓名,入学成绩入学成绩 FROM 学

49、生学生 INTO TABLE ONE2 ENDIF “退出退出”按钮的按钮的Click事件代码：事件代码： Thisform.Release 第第7章章 表单设计与应用表单设计与应用46 7.5 基本型控件 v计时器控件计时器控件 计时器（计时器（TimerTimer）控件可以每隔一定的时间间隔自动触）控件可以每隔一定的时间间隔自动触 发一次发一次TimerTimer事件事件 IntervalInterval属性属性 指定调用计时器指定调用计时器TimerTimer事件的时间间隔，以毫秒为单位事件的时间间隔，以毫秒为单位 EnabledEnabled属性属性 指定计时器控件能否响应指定计时器控

50、件能否响应TimerTimer事件事件 计时器控件常用事件计时器控件常用事件 TimerTimer事件：每隔事件：每隔IntervalInterval属性所设置的时间间隔自动触发一属性所设置的时间间隔自动触发一 次该事件次该事件 第第7章章 表单设计与应用表单设计与应用47 7.5 基本型控件 v计时器控件计时器控件 【例例7.147.14】设计一个显示系统时间的表单。单击（设计一个显示系统时间的表单。单击（Command1Command1） “显示显示”按钮，标签（按钮，标签（LabelLabel）显示当前系统时间，单击）显示当前系统时间，单击 （Command2Command2）“停止停止

51、”按钮，时钟无效。标签和命令按钮控件要按钮，时钟无效。标签和命令按钮控件要 求黑体求黑体2020号字。号字。 操作步骤如下：操作步骤如下： （1）新建表单。添加控件，必须添加）新建表单。添加控件，必须添加1个计时器控件。个计时器控件。 （2）属性设置：）属性设置： 计时器控件计时器控件Timer1的的Interval属性设置为属性设置为1000，Enabled 属性设置为属性设置为.F. （3）编写代码。）编写代码。 “显示显示”按钮的按钮的Click事件代码：事件代码： Thisform.Timer1.Enabled=.T. “停止停止”按钮的按钮的Click事件代码事件代码: Thisfo

52、rm.Timer1.Enabled=.F. 计时器控件计时器控件Timer事件代码：事件代码： Thisform.Label1.Caption=TIME() 第第7章章 表单设计与应用表单设计与应用48 7.5 基本型控件 v微调控件微调控件 微调（微调（SpinnerSpinner）控件可以数值或整数数据进行调整）控件可以数值或整数数据进行调整 IncrementIncrement属性属性 指定在单击微调控件向上或向下箭头键时增加或减少的值指定在单击微调控件向上或向下箭头键时增加或减少的值 KeyBoardHighValueKeyBoardHighValue属性和属性和KeyBoardLow

53、ValueKeyBoardLowValue属性属性 设定在使用键盘输入时的最高和最小限制值设定在使用键盘输入时的最高和最小限制值 SpinnerHighValueSpinnerHighValue属性和属性和SpinnerLowValueSpinnerLowValue属性属性 设定在使用上下按钮微调时的最高和最低限制值设定在使用上下按钮微调时的最高和最低限制值 ValueValue属性属性 设定或返回微调控件的当前值设定或返回微调控件的当前值 第第7章章 表单设计与应用表单设计与应用49 7.5 基本型控件 v微调控件微调控件 【7.157.15】利用微调按钮调整文本框中的背景色，如图所示，更利

54、用微调按钮调整文本框中的背景色，如图所示，更 改红、绿、蓝色微调按钮的数值后，单击改红、绿、蓝色微调按钮的数值后，单击“确定确定”按钮，文本按钮，文本 框根据改变后的三原色值显示相应的颜色。框根据改变后的三原色值显示相应的颜色。 1.新建表单，添加新建表单，添加3个标签、个标签、3个微调按钮、个微调按钮、 1个文本框、个文本框、1个命令个命令 2.微调控件的属性设置如下：微调控件的属性设置如下： 3.“确定确定”按钮的按钮的Click事件代码：事件代码： Text1.BackColor=; RGB(ThisForm.Spinner1.Value,ThisfFrm.Spinner2.Value,

55、ThisForm.Spinner3.Value) 第第7章章 表单设计与应用表单设计与应用50 7.6 容器型控件 v容器型控件简称容器。在容器中可以添加其他控容器型控件简称容器。在容器中可以添加其他控 件，容器与其中所包含的控件一般都有自己的属件，容器与其中所包含的控件一般都有自己的属 性、事件和方法。性、事件和方法。 v选择容器中的控件有如下两种方法选择容器中的控件有如下两种方法 在属性窗口的对象下拉列表框中选择容器中的某个控件在属性窗口的对象下拉列表框中选择容器中的某个控件 鼠标右键单击容器，在弹出的快捷菜单中选择鼠标右键单击容器，在弹出的快捷菜单中选择“编辑编辑” 命令，然后通过鼠标单

56、击选择容器中的某个控件。命令，然后通过鼠标单击选择容器中的某个控件。 v常见的容器型控件常见的容器型控件 命令组、选项组、表格和页框等命令组、选项组、表格和页框等 第第7章章 表单设计与应用表单设计与应用51 7.6 容器型控件 v命令按钮组控件命令按钮组控件 ButtonCountButtonCount属性属性 指定命令按钮组中命令按钮的数目，默认值为指定命令按钮组中命令按钮的数目，默认值为2 2 ValueValue属性属性 指定控件的当前状态，可以是数值型也可以是字符型指定控件的当前状态，可以是数值型也可以是字符型 如果是数值型如果是数值型n n，表示命令组中第，表示命令组中第n n个命

57、令按钮被选中个命令按钮被选中 如果是字符型值如果是字符型值“C”C”，表示命令组中，表示命令组中CaptionCaption属性值为属性值为“C”C”的命的命 令按钮被选中令按钮被选中 命令组生成器命令组生成器 第第7章章 表单设计与应用表单设计与应用52 7.6 容器型控件 v命令组控件命令组控件 【例例7.167.16】新建表单，添加一个包含三个命令按钮的按新建表单，添加一个包含三个命令按钮的按 钮组，水平排列，间距为钮组，水平排列，间距为3030象素，无边框，要求当单击象素，无边框，要求当单击 任何一个按钮时，都弹出相应对话框。任何一个按钮时，都弹出相应对话框。 按钮组控件的按钮组控件的

58、Click事件代码如下：事件代码如下： DO CASE CASE This.Value=1 MESSAGEBOX(单击了第一个按钮单击了第一个按钮,注意！注意！) CASE This.Value=2 MESSAGEBOX(单击了第二个按钮单击了第二个按钮,注意！注意！) CASE This.Value=3 MESSAGEBOX(单击了第三个按钮单击了第三个按钮,注意！注意！) ENDCASE MESSAGEBOX(,按钮类型按钮类型,标题标题) 第第7章章 表单设计与应用表单设计与应用53 7.6 容器型控件 v选项组控件选项组控件 ButtonCountButtonCount属性属性 指定选

59、项组中选项按钮的数目，默认值是指定选项组中选项按钮的数目，默认值是2 2 ControlSourceControlSource属性属性 指定选项组要绑定的数据源指定选项组要绑定的数据源, ,其值可以是字符型或数值型其值可以是字符型或数值型 若为数值型若为数值型2 2，表示选中了选项组中的第，表示选中了选项组中的第2 2个按钮，个按钮， 若为字符型若为字符型“Option2”Option2”，则，则CaptionCaption属性值为属性值为“Option2”Option2”的按钮的按钮 被选中被选中 ValueValue属性属性 初始化或返回选项组中被选中的选项按钮初始化或返回选项组中被选中的

60、选项按钮 可以字符型，也可以是数值型可以字符型，也可以是数值型 选项组生成器选项组生成器 第第7章章 表单设计与应用表单设计与应用54 7.6 容器型控件 v选项组控件选项组控件 【例例7.177.17】设计一个选课查询表单，运行表单时，选择设计一个选课查询表单，运行表单时，选择 选项组中的某个选项，在相应的文本框中输入要查询的选项组中的某个选项，在相应的文本框中输入要查询的 内容，然后单击内容，然后单击“查询查询”按钮，显示相应的查询结果，按钮，显示相应的查询结果， 单击单击“关闭关闭”按钮，关闭并释放表单。按钮，关闭并释放表单。 “查询查询”按钮的按钮的Click事件代码：事件代码： xh