1、LOGO第第7 7章章 表单设计与应用表单设计与应用 第第7章章 表单设计与应用表单设计与应用2本章内容面向对象程序设计的概念面向对象程序设计的概念 7.1创建表单创建表单 7.2表单设计器表单设计器 7.3表单的属性、事件和方法表单的属性、事件和方法 7.4基本型控件基本型控件 7.3容器型控件容器型控件 7.4第第7章章 表单设计与应用表单设计与应用3v表单是程序界面，对话框和窗口表单是程序界面，对话框和窗口第第7章章 表单设计与应用表单设计与应用4v表单是表单是面向对象面向对象程序设计思想在程序设计思想在VFPVFP中的体现中的体现 对象：现实世界中的任何实体都可以认为是对象对象：现实世
2、界中的任何实体都可以认为是对象 对象的三要素对象的三要素属性：用来描述对象的状态，是对象的静态物理特征属性：用来描述对象的状态，是对象的静态物理特征 事件：一种预先定义好的能被对象识别和响应的动作事件：一种预先定义好的能被对象识别和响应的动作 方法：用来描述对象的行为过程方法：用来描述对象的行为过程 VFPVFP中的对象中的对象表单是对象表单是对象组合框是对象组合框是对象命令按钮是对象命令按钮是对象列表框是对象列表框是对象标签是对象标签是对象第第7章章 表单设计与应用表单设计与应用5类的概念v类是具有相同或相似性质的对象的抽象，也就是类是具有相同或相似性质的对象的抽象，也就是说类是具有相同属性
3、、共同方法的对象的集合说类是具有相同属性、共同方法的对象的集合v类是对象的抽象，对象是类的具体化，是类的实类是对象的抽象，对象是类的具体化，是类的实例例 v所有的属性、事件和方法都是由类定义的所有的属性、事件和方法都是由类定义的 第第7章章 表单设计与应用表单设计与应用6汽车一辆红色小汽车一辆红色小汽车 类和对象的关系类和对象的关系:这是一个对象这是一个对象 ，因为它是指一辆具体的汽车实，因为它是指一辆具体的汽车实体，该对象的属性为红色、小型等体，该对象的属性为红色、小型等这是一个类这是一个类 不专指特定的事物不专指特定的事物第第7章章 表单设计与应用表单设计与应用77.1 7.1 面向对象程
4、序设计的概念面向对象程序设计的概念v对象的访问和调用对象的访问和调用 容器与控件对象容器与控件对象vThisform.Command1,Thisform,This.ParentThisform.Command1,Thisform,This.Parent第第7章章 表单设计与应用表单设计与应用87.2 创建表单使用表单向导创建表单使用表单向导创建表单 1使用表单设计器创建表单使用表单设计器创建表单 2第第7章章 表单设计与应用表单设计与应用9v使用表单向导创建表单使用表单向导创建表单 【例例7.17.1】利用表单向导为数据表利用表单向导为数据表“学生学生.dbf”.dbf”创建单创建单表表单，表
5、单标题为表表单，表单标题为“学生信息管理学生信息管理”，表单文件名，表单文件名为为“学生管理学生管理.SCX”.SCX”，按学号升序排列。，按学号升序排列。7.2 创建表单第第7章章 表单设计与应用表单设计与应用10v使用表单设计器创建表单使用表单设计器创建表单 “文件文件”“新建新建”CREATE FORM CREATE FORM 7.2 创建表单第第7章章 表单设计与应用表单设计与应用11v修改表单修改表单 “文件文件”“打开打开”MODIFY FORM MODIFY FORM MODIFY FORM MODIFY FORM 学生情况学生情况.scxscxv表单的保存和运行表单的保存和运行
6、 保存表单保存表单 （表单文件扩展名：（表单文件扩展名：.scxscx）运行表单（多种方法）运行表单（多种方法）7.2 创建表单第第7章章 表单设计与应用表单设计与应用127.3控件的操作与布局对于表单上的控件对于表单上的控件 可以进行以下操作可以进行以下操作选择控件选择控件移动控件移动控件缩放控件缩放控件复制控件复制控件删除控件删除控件控件对齐控件对齐设置设置Tab键次序键次序第第7章章 表单设计与应用表单设计与应用137.3.3 数据环境向数据环境添加表或视图：向数据环境添加表或视图：右键单击右键单击“数据环境设计器窗口数据环境设计器窗口”，然后在弹出，然后在弹出的快捷菜单中选择的快捷菜单
7、中选择【添加添加】命令命令从数据环境中移去表或视图：从数据环境中移去表或视图：右键单击要移去的表或视图，然后在弹出的快捷右键单击要移去的表或视图，然后在弹出的快捷菜单中选择菜单中选择【移去移去】命令命令第第7章章 表单设计与应用表单设计与应用147.4.1 定义表单外观的属性AlwaysOnTopAlwaysOnTop属性属性该属性设置表单在多个窗口时的层次。该属性设置表单在多个窗口时的层次。为真（为真（.T.T.）时：本表单总在窗口的最前面，不会被其他窗口遮）时：本表单总在窗口的最前面，不会被其他窗口遮盖。为假（盖。为假（.F.F.）时：本表单可以被其他窗口所遮盖。）时：本表单可以被其他窗口
8、所遮盖。AutoCenterAutoCenter属性属性决定表单在决定表单在VFVF窗口中的位置是否剧中窗口中的位置是否剧中BackColorBackColor属性属性该属性设置表单窗口的背景颜色该属性设置表单窗口的背景颜色BorderStyleBorderStyle属性属性指定表单边框样式。指定表单边框样式。0 0：无边框。：无边框。1 1：单线边框。：单线边框。2 2：固定对话框。：固定对话框。3 3：可调边框（默认值）：可调边框（默认值）CaptionCaption属性属性表单标题栏显示文本内容。可以在表单属性窗口中设置，也可以表单标题栏显示文本内容。可以在表单属性窗口中设置，也可以用命
9、令语句设置用命令语句设置第第7章章 表单设计与应用表单设计与应用157.4.1 定义表单行为的属性Closable属性属性表单标题栏上的关闭按钮是否有效。表单标题栏上的关闭按钮是否有效。为真（为真（.T.）时：关闭按钮有效，可以关闭表单。）时：关闭按钮有效，可以关闭表单。为假（为假（.F.）时：关闭按钮无效，不能关闭表单。关闭表单选择）时：关闭按钮无效，不能关闭表单。关闭表单选择“文件文件关闭关闭”MaxButton属性属性为真（为真（.T.）时：最大化按钮有效，可以将表单最大化或还原表单大小。）时：最大化按钮有效，可以将表单最大化或还原表单大小。为假（为假（.F.）时：最大化按钮无效，不可以
10、最大化表单。）时：最大化按钮无效，不可以最大化表单。MinButton属性属性为真（为真（.T.）时：最小化按钮有效，可将表单最小化显示在任务栏处。）时：最小化按钮有效，可将表单最小化显示在任务栏处。为假（为假（.F.）时：最小化按钮无效，不能将表单最小化。）时：最小化按钮无效，不能将表单最小化。Movable属性属性运行时，用户是否能够移动表单。运行时，用户是否能够移动表单。为真（为真（.T.）时：能移动表单。）时：能移动表单。为假（为假（.F.）时：不能移动表单。）时：不能移动表单。第第7章章 表单设计与应用表单设计与应用167.4.1 表单其他属性ShowWindow属性属性 指定一个表
11、单或工具栏是否是顶层表单或是子表单指定一个表单或工具栏是否是顶层表单或是子表单 0：在屏幕中（默认值）：在屏幕中（默认值）1：在顶层表单中：在顶层表单中2：作为顶层表单：作为顶层表单WindowType属性属性表单的模式状态。表单的模式状态。0：非模式表单，在应用程序中，在关闭运行的非模式：非模式表单，在应用程序中，在关闭运行的非模式表单之前，可以访问程序中的其他界面元素。表单之前，可以访问程序中的其他界面元素。1：模式表单，在应用程序中，在关闭运行的模式表单：模式表单，在应用程序中，在关闭运行的模式表单之前，不能访问程序中的其他界面元素。之前，不能访问程序中的其他界面元素。第第7章章 表单设
12、计与应用表单设计与应用177.4.2 表单常用方法（1 1）RefreshRefresh方法方法：刷新表单。：刷新表单。（2 2）ReleaseRelease方法方法：将表单从内存中释放。表单运行时，用：将表单从内存中释放。表单运行时，用户单击表单右上角的关闭按钮，系统会自动执行户单击表单右上角的关闭按钮，系统会自动执行RelaseRelase方方法。法。（3 3）ShowShow方法方法：显示表单。该方法将表单的：显示表单。该方法将表单的VisibleVisible属性设属性设置为置为.T.T.。（4 4）HideHide方法方法：隐藏表单。该方法将表单的：隐藏表单。该方法将表单的Visib
13、leVisible属性设属性设置为置为.F.F.。与。与RelaseRelase方法不同，方法不同，HideHide只是把表单隐藏，但只是把表单隐藏，但并不将表单从内存释放，之后可用并不将表单从内存释放，之后可用ShowShow方法重新显示表单。方法重新显示表单。（5 5）SetFocusSetFocus方法方法使控件获得焦点，从而成为活动对象。当该控件的使控件获得焦点，从而成为活动对象。当该控件的VisibleVisible属性值或属性值或EnabledEnabled属性值为属性值为.F.F.时，将不能获得焦点时，将不能获得焦点.第第7章章 表单设计与应用表单设计与应用187.4.2 表单常
14、用事件ClickClick事件事件用户在某个对象上单击鼠标时，触发该事件。用户在某个对象上单击鼠标时，触发该事件。DbClickDbClick事件事件 鼠标双击对象时触发该事件。鼠标双击对象时触发该事件。RightClickRightClick事件事件 鼠标右键单击对象时触发该事件。鼠标右键单击对象时触发该事件。InitInit事件事件创建对象时触发。创建对象时触发。控件控件InitInit事件事件在表单在表单InitInit事件事件前前引发，因引发，因此在表单此在表单InitInit事件代码中访问它所包含的所有控件对象。事件代码中访问它所包含的所有控件对象。DestroyDestroy事件事
15、件当释放一个对象时触发。当释放一个对象时触发。表单表单DestroyDestroy事件事件在控件在控件DestroyDestroy事事件引发之件引发之前前引发。引发。因此能够在表单对象的因此能够在表单对象的DestroyDestroy事件代事件代码中访问它所包含的所有控件对象。码中访问它所包含的所有控件对象。第第7章章 表单设计与应用表单设计与应用197.4.2 表单常用事件LoadLoad事件事件对象创建之前引发。对象创建之前引发。在运行表单时，先引发在运行表单时，先引发LoadLoad事件，然后引发事件，然后引发InitInit事件。事件。UnloadUnload事件事件释放表单时触发。它
16、是释放表单对象时释放表单时触发。它是释放表单对象时最后一个触发的事件最后一个触发的事件。GotFocusGotFocus事件事件当表单通过用户操作或以代码方式得到焦点时触发。当表单通过用户操作或以代码方式得到焦点时触发。运行表单引发事件顺序：运行表单引发事件顺序：Load控件的控件的Init表单的表单的Init释放表单引发事件顺序：释放表单引发事件顺序：表单的表单的Destory控件的控件的Destory 表单的表单的Unload第第7章章 表单设计与应用表单设计与应用207.4 表单的属性、事件和方法v创建新的属性和方法创建新的属性和方法 创建新属性创建新属性 创建新方法创建新方法 第第7章
17、章 表单设计与应用表单设计与应用217.4 表单的属性、事件和方法v创建新的属性和方法创建新的属性和方法 【例例7.57.5】新建一个表单，在该表单中添加一个名为新建一个表单，在该表单中添加一个名为newnew的方法，方法代码为：的方法，方法代码为：wait new windowswait new windows。第第7章章 表单设计与应用表单设计与应用227.5 基本型控件 v标签控件标签控件 CaptionCaption属性属性 设置标签控件标题所显示的文本信息设置标签控件标题所显示的文本信息 AlignmentAlignment属性属性 设定标签控件中的文本显示的对齐方式设定标签控件中的
18、文本显示的对齐方式 【例例7.6】表单上添加一个标签（表单上添加一个标签（Label1），），标签上显示标签上显示“欢迎使用欢迎使用”，字体颜色为红色，字体颜色为红色（ForeColor=255,0,0），），18号字，黑体号字，黑体 第第7章章 表单设计与应用表单设计与应用237.5 基本型控件 v命令按钮控件命令按钮控件 CaptionCaption属性属性 指定对象的标题文本内容指定对象的标题文本内容 访问键访问键:退出退出(E)(E)ThisForm.Command1.Caption=ThisForm.Command1.Caption=退出退出(E)(E)DefaultDefault属
19、性属性 指定按下指定按下ENTERENTER键时，哪个命令按钮响应键时，哪个命令按钮响应 在一个表单中，只能有一个命令按钮的在一个表单中，只能有一个命令按钮的DefaultDefault属性值为属性值为.T.T.CancelCancel属性属性 指定按下指定按下ESCESC键时，哪个命令按钮响应键时，哪个命令按钮响应 在一个表单中，只能有一个在一个表单中，只能有一个CancelCancel属性值为属性值为.T.T.第第7章章 表单设计与应用表单设计与应用247.5 基本型控件 v命令按钮控件命令按钮控件 【例例7.77.7】新建一个表单文件新建一个表单文件myform.scxmyform.sc
20、x，其中包含，其中包含2 2个命令按钮，标题个命令按钮，标题为为“OK”OK”、“Cancel”Cancel”。如图所示。将。如图所示。将“OK”OK”按钮设置为确认按钮，即按钮设置为确认按钮，即通过按通过按“Enter”Enter”可以选择该按钮，并将其宽度设为可以选择该按钮，并将其宽度设为6060。“Cancel”Cancel”按钮按钮的第的第1 1个字母个字母C C设置成设置成“访问键访问键”即通过按即通过按Alt+CAlt+C就可以选择该按钮。单击就可以选择该按钮。单击“Cancel”Cancel”按钮，关闭并释放表单。按钮，关闭并释放表单。新建表单，添加新建表单，添加2个命令按钮个命
21、令按钮 属性设置属性设置 编写代码编写代码 “OK”按钮的按钮的Click事件代码：事件代码：Thisform.Caption=“确认确认”“Cancel”按钮的按钮的Click事件代码：事件代码：Thisform.Release 第第7章章 表单设计与应用表单设计与应用257.5 基本型控件 v文本框控件文本框控件 文本框控件（文本框控件（TextText）用于显示文本，也用于编辑文本）用于显示文本，也用于编辑文本 ControlSourceControlSource属性属性 指定与对象建立联系的数据源指定与对象建立联系的数据源:字段或内存变量字段或内存变量 ValueValue属性属性 指
22、定或返回文本框中的当前内容，默认为空串指定或返回文本框中的当前内容，默认为空串 可以接收任意类型数据可以接收任意类型数据 非数字字符型数据或数值型数据时，直接输入非数字字符型数据或数值型数据时，直接输入 数字字符型数据，数据两端要字符定界符数字字符型数据，数据两端要字符定界符 表达式的值，以等号引导表达式的值，以等号引导 第第7章章 表单设计与应用表单设计与应用267.5 基本型控件 v文本框控件文本框控件 PasswordCharPasswordChar属性属性 指定文本框控件内是显示用户输入的字符还是显示占位符指定文本框控件内是显示用户输入的字符还是显示占位符 InputMaskInput
23、Mask属性属性 指定在文本框控件中如何输入和显示数据，由模式符组成指定在文本框控件中如何输入和显示数据，由模式符组成 ReadOnlyReadOnly属性属性 指定用户能否修改编辑框中的文本内容指定用户能否修改编辑框中的文本内容 为真（为真（.T.T.）时，用户不能修改编辑框中的内容）时，用户不能修改编辑框中的内容 为假（为假（.F.F.）时，用户可以修改编辑框中的内容。默认值）时，用户可以修改编辑框中的内容。默认值该文本框的该文本框的PasswordChar属性为属性为“*”第第7章章 表单设计与应用表单设计与应用277.5 基本型控件 v文本框控件文本框控件 【例例7.8】建立如图建立如
24、图7.48所示表单。表单文件名和标题名均为所示表单。表单文件名和标题名均为“文本框使用文本框使用”。在操作数在操作数1（Label1）和操作数）和操作数2（Label2）下的）下的2个文本框个文本框(分别为分别为Text1和和Text2)中只能接收数字、正负号和空格，宽度为中只能接收数字、正负号和空格，宽度为5，“计算计算”按钮的初始状态为按钮的初始状态为不可用，当运行表单后，其状态为可用。单击不可用，当运行表单后，其状态为可用。单击“退出退出”按钮关闭并释放表单，按钮关闭并释放表单，运行结果如图运行结果如图7.49所示。所示。（1）新建表单，添加）新建表单，添加2个标签、个标签、2个文本框、
25、个文本框、2个命令按钮。个命令按钮。（2）属性设置）属性设置（3）编写代码。）编写代码。Form1的的Init事件代码：事件代码：Thisform.Command1.Enabled=.T.“退出退出”按钮的按钮的Click事件代码：事件代码：Thisform.Release 第第7章章 表单设计与应用表单设计与应用287.6 容器型控件 v表格控件表格控件 表格是一个可与数据绑定的容器控件，由若干列对象组成，列表格是一个可与数据绑定的容器控件，由若干列对象组成，列包含标头和控件，列拥有自己的属性、事件和方法。包含标头和控件，列拥有自己的属性、事件和方法。ColumnCountColumnCou
26、nt属性属性 指定表格列对象的数目。该属性默认值为指定表格列对象的数目。该属性默认值为-1-1，此时表格将创建足，此时表格将创建足够多的列来显示数据源中的所有字段。够多的列来显示数据源中的所有字段。RecordSourceTypeRecordSourceType属性和属性和RecordSourceRecordSource属性属性 RecordSourceRecordSource属性为记录源属性为记录源 RecordSourceTypeRecordSourceType属性为记录源类型属性为记录源类型 第第7章章 表单设计与应用表单设计与应用297.6 容器型控件 v表格控件表格控件 表格基本操作
27、表格基本操作 通过设置表格的通过设置表格的HeaderHeightHeaderHeight和和RowHeightRowHeight属性调整行高，设置属性调整行高，设置列对象的列对象的WidthWidth属性调整列宽属性调整列宽 当表格处于编辑状态下，用鼠标拖动调整表格的行高和列宽当表格处于编辑状态下，用鼠标拖动调整表格的行高和列宽 使用表格生成器设计表格使用表格生成器设计表格 第第7章章 表单设计与应用表单设计与应用307.6 容器型控件 v表格控件表格控件 【7.187.18】修改修改【例例7.177.17】的选课查询表单，添加一个表的选课查询表单，添加一个表格，将查询的结果显示在表格中格，
28、将查询的结果显示在表格中 1.表格表格RecordSourceType属性值为属性值为“4-SQL说明说明”2.“查询查询”按钮的按钮的Click事件代码：事件代码：xh=Alltrim(ThisForm.Text1.Value)kch=Alltrim(ThisForm.Text2.Value)IF ThisForm.OptionGroup1.Value=1 ThisForm.Grid1.RecordSource=SELE*FROM;选课选课 WHERE 学号学号=xh INTO CURSOR tmpELSE ThisForm.Grid1.RecordSource=SELE*FROM;选课选课
29、 WHERE课程号课程号=kch INTO CURSOR tmpENDIF 第第7章章 表单设计与应用表单设计与应用317.5 基本型控件 v列表框控件列表框控件 列表框（列表框（ListBoxListBox）控件包含一个选项列表，用户可以）控件包含一个选项列表，用户可以从列表中选择各个选项从列表中选择各个选项 RowSourceTypeRowSourceType属性属性 指定列表框中列表项的数据源类型指定列表框中列表项的数据源类型 RowSourceRowSource属性属性 指定列表框中列表项的数据源指定列表框中列表项的数据源 第第7章章 表单设计与应用表单设计与应用327.5 基本型控件
30、 v列表框控件列表框控件 ListList属性属性 用字符串数组用字符串数组ListList来存取列表框控件中的各个数据项来存取列表框控件中的各个数据项 设计时不可用设计时不可用 读取列表框中第读取列表框中第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)=This
31、form.List1.List(1,3)=男男 ListCountListCount属性属性 统计列表框中列表项的数目统计列表框中列表项的数目 Val=Thisform.List1.ListCountVal=Thisform.List1.ListCount 则变量则变量valval值为值为8 8第第7章章 表单设计与应用表单设计与应用337.5 基本型控件 v列表框控件列表框控件 ColumnCountColumnCount属性属性 指定列表框的列数指定列表框的列数 ValueValue属性属性 该属性为只读，返回列表框选中的列表项该属性为只读，返回列表框选中的列表项 该属性可以是字符型，也可
32、以是数值型该属性可以是字符型，也可以是数值型:如果是字符型，返回的是被选中条目本身内容如果是字符型，返回的是被选中条目本身内容如果是数值型，则返回选中条目在列表框中的次序号如果是数值型，则返回选中条目在列表框中的次序号 ControlSourceControlSource属性属性 用户通过该属性指定一个字段或变量用来保存用户从列表框中用户通过该属性指定一个字段或变量用来保存用户从列表框中选择的结果选择的结果 SelectedSelected属性属性 指定列表框内某个列表项是否处于选定状态。逻辑型数组指定列表框内某个列表项是否处于选定状态。逻辑型数组第第7章章 表单设计与应用表单设计与应用347
33、.5 基本型控件 v列表框控件列表框控件 MultiSelectMultiSelect属性属性 指定用户能否在列表框内进行多重选择，以及如何进行多重选指定用户能否在列表框内进行多重选择，以及如何进行多重选择择【例【例7.11】在在Form1表单中，添加表单中，添加1个个列表框，名称为列表框，名称为List1，高度为，高度为120，设，设置列表框的相关属性，使得当单击列表置列表框的相关属性，使得当单击列表框中的学号后，在文本框中显示该学生框中的学号后，在文本框中显示该学生的相关信息，如图所示。的相关信息，如图所示。第第7章章 表单设计与应用表单设计与应用357.5 基本型控件 v操作步骤如下：操
34、作步骤如下：新建表单，添加新建表单，添加1 1个列表框，个列表框，4 4个标签，个标签，4 4个文本框。个文本框。属性设置。属性设置。编写代码：编写代码：“列表框列表框”的的ClickClick事件代码：事件代码：ThisForm.RefreshThisForm.Refresh 第第7章章 表单设计与应用表单设计与应用367.5 基本型控件 v组合框控件组合框控件 组合框（组合框（ComboBoxComboBox）控件结合了列表框和文本框控件）控件结合了列表框和文本框控件的特点的特点 列表框的属性大部分也适用于组合框列表框的属性大部分也适用于组合框 StyleStyle属性：决定组合框样式属性
35、：决定组合框样式 0 0：下拉组合框。用户既可以从列表中选择内容，也可以在编：下拉组合框。用户既可以从列表中选择内容，也可以在编辑区输入内容。辑区输入内容。2 2：下拉列表框。用户只能从列表中选择内容。：下拉列表框。用户只能从列表中选择内容。第第7章章 表单设计与应用表单设计与应用377.5 基本型控件 v组合框控件组合框控件 【例例7.127.12】新建表单新建表单oneone，添加，添加1 1个组合框（个组合框（Combo1Combo1），将其设置为下拉），将其设置为下拉列表框，设置组合框的相关属性，使其显示的条目为列表框，设置组合框的相关属性，使其显示的条目为“外语外语”、“物物理理”、
36、“计算机计算机”，向表单中添加两个命令按钮，其标题分别为，向表单中添加两个命令按钮，其标题分别为“统统计计”、“退出退出”，为表单的，为表单的“统计统计”按钮编写一条按钮编写一条SQLSQL命令，执行该命令命令，执行该命令时，将统计时，将统计“学生表学生表”所有专业与组合框中指定的内容相同的学生信息所有专业与组合框中指定的内容相同的学生信息全部显示出来，单击全部显示出来，单击“退出退出”按钮关闭并释放表单。按钮关闭并释放表单。属性设置如下：属性设置如下：“统计统计”按钮的按钮的Click事件代码：事件代码：SELECT*FROM 学生学生 WHERE 专业专业=ThisForm.Combo1.
37、Value 第第7章章 表单设计与应用表单设计与应用387.5 基本型控件 v组合框控件组合框控件 【例例7.137.13】设计一个选课录入表单，表单运行时，在左侧的列表框中选设计一个选课录入表单，表单运行时，在左侧的列表框中选择学生的学号，然后在右侧的下拉组合框中选择课程号，最后单击择学生的学号，然后在右侧的下拉组合框中选择课程号，最后单击“增增加选课记录加选课记录”按钮，将所选内容插入到按钮，将所选内容插入到“选课选课”表中。表中。部分控件属性设置如下：部分控件属性设置如下：“增加选课记录增加选课记录”按钮的按钮的Click事件代码：事件代码：xh=ThisForm.List1.Value
38、kch=ThisForm.Combo1.ValueLOCATE FOR 学号学号=xh AND 课程号课程号=kchIF NOT FOUND()INSERT INTO 选课选课(学号学号,课程号课程号)VALUES(xh,kch)ENDIF第第7章章 表单设计与应用表单设计与应用397.5 基本型控件 v编辑框控件编辑框控件 用来输入、编辑字符型数据用来输入、编辑字符型数据 当编辑的内容大于当编辑的内容大于255255个字符时，只能用编辑框控件个字符时，只能用编辑框控件 ScrollBarsScrollBars属性属性 指定编辑框是否有滚动条指定编辑框是否有滚动条 0 0没有滚动条没有滚动条
39、2 2有垂直滚动条有垂直滚动条 （默认值）（默认值）SelStartSelStart属性属性 返回用户在编辑框的文本输入区所选定的文本的起始点位置返回用户在编辑框的文本输入区所选定的文本的起始点位置 有效取值范围在有效取值范围在0 0与编辑区中的字符总数之间与编辑区中的字符总数之间 设计时不可用设计时不可用 还适用于文本框、组合框等控件还适用于文本框、组合框等控件 第第7章章 表单设计与应用表单设计与应用407.5 基本型控件 v编辑框控件编辑框控件 SelLengthSelLength属性属性 返回用户在编辑框的文本输入区选定的字符的数目返回用户在编辑框的文本输入区选定的字符的数目 若没有文
40、本被选定，则返回若没有文本被选定，则返回0 0 设计时不可用设计时不可用 SelTextSelText属性属性 返回用户在编辑框的文本输入区选定的文本返回用户在编辑框的文本输入区选定的文本 若没有选定任何文本，则返回若没有选定任何文本，则返回0 0长度字符串长度字符串 若将若将SelTextSelText属性设置为一个新值，则该新值将替换编辑区中属性设置为一个新值，则该新值将替换编辑区中选定的文本，并且选定的文本，并且SelLengthSelLength属性值变为属性值变为0 0。设计时不可用设计时不可用 第第7章章 表单设计与应用表单设计与应用417.5 基本型控件 v编辑框控件编辑框控件【
41、例例7.97.9】表单内包含表单内包含1 1个文本框、个文本框、1 1个编辑框、个编辑框、2 2个命令按钮，所个命令按钮，所有控件中显示的文字为有控件中显示的文字为2020号字，当单击号字，当单击“查找查找”按钮时，在编辑按钮时，在编辑框中查找字符串框中查找字符串“VFP”VFP”，如图，如图7.507.50所示。单击所示。单击“替换替换”按钮时，按钮时，将文本框中内容替换编辑框中查找的内容，如图将文本框中内容替换编辑框中查找的内容，如图7.517.51所示。所示。第第7章章 表单设计与应用表单设计与应用427.5 基本型控件 v编辑框控件编辑框控件 新建表单。添加新建表单。添加1 1个编辑框
42、，个编辑框，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.ValueENDIF第第7章章 表单设计与应用表单设
43、计与应用437.5 基本型控件 v复选框控件复选框控件 复选框（复选框（CheckBoxCheckBox）用于标记逻辑真（）用于标记逻辑真（.T.T.）和逻辑假）和逻辑假（.F.F.）两值状态）两值状态 CaptionCaption属性属性 用来设置复选框旁边显示的文字信息用来设置复选框旁边显示的文字信息 ValueValue属性属性 指定复选框的当前状态。该属性值有三种情况：指定复选框的当前状态。该属性值有三种情况：为为0 0或或.F.F.：默认值，表示复选框未被中：默认值，表示复选框未被中 为为1 1或或.T.T.：表示复选框被选定：表示复选框被选定 为为2 2或或.NULL.NULL.：
44、不确定（只在代码中有效）：不确定（只在代码中有效）ControlSourceControlSource属性属性 指定与复选框建立联系的数据源指定与复选框建立联系的数据源 第第7章章 表单设计与应用表单设计与应用447.5 基本型控件 v复选框控件复选框控件【例例7.107.10】新建一个如图新建一个如图7.527.52所示的表单名和文件名均为所示的表单名和文件名均为myformmyform的表单，的表单，表单中有两个命令按钮，标题分别为表单中有两个命令按钮，标题分别为“生成表生成表”、“退出退出”，两个复选，两个复选框，标题分别为框，标题分别为“专业专业”、“入学成绩入学成绩”。单击。单击“生
45、成表生成表“按钮，程序按钮，程序功能是根据表单运行时复选框选定的字段内容生成新表，如果两个复选功能是根据表单运行时复选框选定的字段内容生成新表，如果两个复选框都被选中，生成的自由表名为框都被选中，生成的自由表名为two.dbftwo.dbf，two.dbftwo.dbf表中包含表中包含“学生学生”表表中的学号、姓名、专业、入学成绩；如果只选中中的学号、姓名、专业、入学成绩；如果只选中“专业专业”复选框，生成复选框，生成的自由表名为的自由表名为one1.dbfone1.dbf，该表包含，该表包含“学生学生”表中的学号、姓名、专业，表中的学号、姓名、专业，如果只选中如果只选中“入学成绩入学成绩”复
46、选框，生成的自由表名为复选框，生成的自由表名为one2.dbfone2.dbf，该表包，该表包含含“学生学生”表中的学号、姓名、入学成绩。表中的学号、姓名、入学成绩。“退出退出”按钮关闭并释放表按钮关闭并释放表单。单。第第7章章 表单设计与应用表单设计与应用457.5 基本型控件 v复选框控件复选框控件（1 1）新建表单，添加）新建表单，添加2 2个复选框，个复选框，2 2个命令按钮个命令按钮（2 2）属性设置）属性设置（3 3）编写代码）编写代码 “生成表生成表”按钮的按钮的Click事件代码：事件代码：IF ThisForm.Check1.Value=1 And ThisForm.Chec
47、k2.Value=1 SELECT 学号学号,姓名姓名,专业专业,入学成绩入学成绩 FROM 学生学生 INTO TABLE TWOENDIFIF ThisForm.Check1.Value=1 And ThisForm.Check2.Value=0 SELECT 学号学号,姓名姓名,专业专业 FROM 学生学生 INTO TABLE ONE1ENDIFIF ThisForm.Check1.Value=0 And ThisForm.Check2.Value=1 SELECT 学号学号,姓名姓名,入学成绩入学成绩 FROM 学生学生 INTO TABLE ONE2ENDIF“退出退出”按钮的按钮
48、的Click事件代码：事件代码：Thisform.Release第第7章章 表单设计与应用表单设计与应用467.5 基本型控件 v计时器控件计时器控件 计时器（计时器（TimerTimer）控件可以每隔一定的时间间隔自动触）控件可以每隔一定的时间间隔自动触发一次发一次TimerTimer事件事件 IntervalInterval属性属性 指定调用计时器指定调用计时器TimerTimer事件的时间间隔，以毫秒为单位事件的时间间隔，以毫秒为单位 EnabledEnabled属性属性 指定计时器控件能否响应指定计时器控件能否响应TimerTimer事件事件 计时器控件常用事件计时器控件常用事件 Ti
49、merTimer事件：每隔事件：每隔IntervalInterval属性所设置的时间间隔自动触发一属性所设置的时间间隔自动触发一次该事件次该事件 第第7章章 表单设计与应用表单设计与应用477.5 基本型控件v计时器控件计时器控件【例例7.147.14】设计一个显示系统时间的表单。单击（设计一个显示系统时间的表单。单击（Command1Command1）“显示显示”按钮，标签（按钮，标签（LabelLabel）显示当前系统时间，单击）显示当前系统时间，单击（Command2Command2）“停止停止”按钮，时钟无效。标签和命令按钮控件要按钮，时钟无效。标签和命令按钮控件要求黑体求黑体2020
50、号字。号字。操作步骤如下：操作步骤如下：（1）新建表单。添加控件，必须添加）新建表单。添加控件，必须添加1个计时器控件。个计时器控件。（2）属性设置：）属性设置：计时器控件计时器控件Timer1的的Interval属性设置为属性设置为1000，Enabled属性设置为属性设置为.F.（3）编写代码。）编写代码。“显示显示”按钮的按钮的Click事件代码：事件代码：Thisform.Timer1.Enabled=.T.“停止停止”按钮的按钮的Click事件代码事件代码:Thisform.Timer1.Enabled=.F.计时器控件计时器控件Timer事件代码：事件代码：Thisform.Lab
