VFP第6章 表单设计

1、第第6章章 表单的设计表单的设计Visual FoxPro Visual FoxPro 程序设计（第三版）程序设计（第三版）第第6 6章章 表单设计表单设计第第6章章 表单的设计表单的设计创建表单创建表单6.1表单控件表单控件6.2表单控件的综合运用表单控件的综合运用6.3第第6章章 表单的设计表单的设计方法： 文件菜单笺新建表单新文件（或向导） 项目管理器文档表单新建 即可进入表单设计器常使用表单向导（Form Wizard）或表单设计器（Form Designer）来新建表单。6.1 创建表单创建表单表单又叫“窗体”，提供给用户一个对数据查看、输入的屏幕“界面”；提供了一个能适应用户事件和

2、系统事件的强有力的对象集，使用户能方便地完成信息管理任务。在表单向导对话框中，按提示（与使用其它向导一样）一步步选择完成。第第6章章 表单的设计表单的设计6.1.1 使用向导建立表单使用向导建立表单第第6章章 表单的设计表单的设计第第6章章 表单的设计表单的设计第第6章章 表单的设计表单的设计第第6章章 表单的设计表单的设计6.1.2 使用表单设计器创建表单使用表单设计器创建表单第第6章章 表单的设计表单的设计第第6章章 表单的设计表单的设计步骤：每个表单都有相应的属性、事件、方法。常用表单控制工具栏、调色板工具栏、布局工具栏、属性窗口、数据环境等进行设计。设计一个表单的步骤： 1）创建表单并

3、设置表单的属性 2）给表单添加适当的控件 3）设置控件的属性 4）编写事件代码第第6章章 表单的设计表单的设计第第6章章 表单的设计表单的设计6.1.3 表单属性表单属性第第6章章 表单的设计表单的设计6.1.4 修饰表单修饰表单1. 调整大小2. 移动位置3. 设置字体和字号4. 设置颜色5. 布局排列第第6章章 表单的设计表单的设计命令按钮组命令按钮组选定对象选定对象查看类查看类标签标签文文本本框框编辑框编辑框命令按钮命令按钮选项按钮组选项按钮组复选框复选框组合框组合框列表框列表框微调控件微调控件表格表格图象图象计计时时器器页框页框ActiveActive控件控件绑定控件绑定控件线条线条形

4、状形状容器容器分隔符分隔符超级链接超级链接生成器锁定生成器锁定按钮锁定按钮锁定 可在设计期间或运行期间操作VFP控件。VFP控件通用而强大，可以配置不同的控件来完成同样的任务。6.2 表单控件的使用表单控件的使用6.2.1、表单控件、表单控件第第6章章 表单的设计表单的设计（1）常用控件表单设计器窗口的表单控件工具栏显示的便是常用控件。这些常用控件的功能和使用方法，将在下面进行详细介绍（2）ActiveX控件 ActiveX控件是OLE自定义控件，通常用于32位的开发工具和平台，功能强大，应用也较复杂。 （3）自定义控件 用户可以自己定义控件，可以选择一个可视类库作为控件添加到工具栏中。表单控

5、件工具栏中各控件的功能 。第第6章章 表单的设计表单的设计 选定控件 分组控件 移动控件 改变控件大小 删除控件 取消控件第第6章章 表单的设计表单的设计1功能标签主要用于显示固定的文本信息。 2常用属性caption： 指定标签的显示文本。可以在设计时设置，也可以在程序运时设置或修改。Forecolor：设置标题的字体颜色。Backstyle：设置标签的背景是否透明，0透明，1不透明，默认为不透明。name ：标签对象的名称，是程序中访问标签对象的标识。 Alignment：指定标题控件中显示的对齐方式。3.举例：P1796.2.2 标签（标签（Label）控件）控件第第6章章 表单的设计表

6、单的设计1功能：用于显示或接收单行文本信息（不设置ControlSource属性），默认输入类型为字符型，最大长度为256个字符。用于显示或编辑对应变量或字段的值（设置ControlSource属性为已有变量或字段名）。2常用属性ControlSource：设置文本框的数据来源。一般情况下，可以利用该属性为文本框指定一个字段或内存变量。6.2.3 文本框（文本框（TextBox）控件）控件第第6章章 表单的设计表单的设计Value：保存文本框的当前内容，如果没有为ControlSource属性指定数据源，可以通过该属性访问文本框的内容。它的初值决定文本框中值的类型。如果为ControlSour

7、ce属性指定了数据源，该属性值与ControlSource属性指定的变量或字段的值相同。PassWordChar：设置输入口令时显示的字符。Readonly：确定文本框是否为只读，为“.T.”时，文本框的值不可修改。第第6章章 表单的设计表单的设计 3. 常用的事件过程 GetFocus Event：获得焦点后发生。例如： THIS.SelStart=0 THIS.SelLength=LEN（ALLTRIM（THIS.value） When Event：获得焦点前发生，返回逻辑值。例如： IF THIS.Value500 =MESSAGEBOX(“数据已经很大，不允许再编辑”) ENDIF R

8、ETRUN THIS.Value=200 and THIS.Value=2或null不确定，只在代码中有效 Value：用来指明复选框的当前状态,如下表 ControlSource属性：用于指定复选框的数据源* 补充控件补充控件第第6章章 表单的设计表单的设计2. 2. 选项组选项组(OptionGroup)(OptionGroup)控件控件 1)选项组控件的功能 选项组又称为选项按钮组，是包含选项按钮的一种容器。一个选项组中往往包含若干个选项按钮，但用户只能从中选择一个按钮。当用户单击某个选项按钮时，该按钮即成为被选中状态，而选项组中的其他选项按钮，不管原来是什么状态，都变为未选中状态，被选

9、中的选项按钮中会显示一个圆点。2)选项组常用属性 ButtonCount：指定选项组中选项按钮的数目。 Value：用于指定选项组中哪个选项按钮被选中。Buttons：用于存取选项组中每个选项的数组。第第6章章 表单的设计表单的设计ControlSource: 指定选项组数据源。 将该属性值设为一个字符型变量或字段变量名，就可以把选定的选项文字自动存入变量，变量的值也会使文字相同的选项自动被选中。如：把表中“性别”字段的取值男、女设为选项钮的Caption ,把选项按钮组的ControlSource设为“性别”，就可以为性别字段输入输出。第第6章章 表单的设计表单的设计【例1】:设计一个课程查

10、询表单，在表单中使用单选按钮控件和按钮、文本框。打开表单设计器，使用表单控件工具栏、属性窗口、数据环境设计器，进行以下操作：（1）设计、定义表单属性：Caption=课程查询Name= Form1Visable =.T.（2)在表单中添加一个选择按钮组,在其中用两个选择按钮：AutoSize=.T.ControlSize=无Name= OptionGroup1Visable=.T.第第6章章 表单的设计表单的设计l “课程号”按钮 Caption=课程号 Name= Opti1 AutoSize=.T. ClickEvent=用户自定义过程 Style=0-标准 Value=.T.l “课程名

11、”按钮 Caption=课程名 Name= Opti2 Autosize=.f.ClickEvent=用户自定义过程 Style=0-标准 Value=.f.第第6章章 表单的设计表单的设计（3）添加一个文本框用来输入课程号：Name= Text1AutoSize=.t.ClickEvent=用户自定义过程Style=0-标准Value=1FontSize=8Format=1InitEvent=用户自定义过程InputMask=无MaxLenth=7Seconds=2-默认SelectOnEntry=.T.TabIndex=0第第6章章 表单的设计表单的设计（4）添加一个文本框用来输入课程名称

12、：NAME= Text2Alignment=0Autosize=.t.ClickEvent=用户自定义过程ControlSource=无DateFormat=14-汉语Enabled=.T.HideSelection=.F.Style=0-标准Value=FontSize=10Format=KInitEvent=用户自定义过程InputMask=无MaxLenth=8第第6章章 表单的设计表单的设计PasswordChar=无ReadOnly=.F.Seconds=2-默认SelectOnEntry=.T.Style=0TabIndex=4Visable=.T.（5）添加“开始”命令按钮：NA

13、ME= Command1AutoSize=.F.ClickEvent=用户自定义过程Enabled=.T.Style=0-标准FontSize=9Style=0TabIndex=2Visable=.T.第第6章章 表单的设计表单的设计NAME= Command2Autosize=.F.ClickEvent=用户自定义过程Enabled=.T.Style=0-标准FontSize=9Style=0TabIndex=2Visible=.T.Caption=退出（6）添加）添加“退出退出”命令按钮：命令按钮：（7）为）为“开始开始”按钮按钮Click事件编写代码：事件编写代码：cxp1=this.p

14、arent.optiongroup1.opti1.valuecxp2=this.parent.optiongroup1.opti2.valuevalue1=this.parent.text1.valuevalue2=this.parent.text2.value第第6章章 表单的设计表单的设计（8）为“退出”按钮Click事件编写代码：rele thisformsele 1restore screen结果如图所示。本例题设计时应注意：“课程号”按钮与文本框一、“课程名”按钮与文本框二在使用上的配合一致性,在编写“开始”按钮程序代码时应严谨统一。第第6章章 表单的设计表单的设计【例2】命令按钮组

15、、选项组、复选框、编辑框应用示例，按下图设计一个表单，要求：用户单击确定按钮时，在编辑框中显示用户对选项组和复选框的选择。并将表单保存为FORM3第第6章章 表单的设计表单的设计编写事件代码 选择命令按钮组，在属性窗口中双击“CLICK EVENT”属性，系统会打开代码编写器，在代码编写器窗口为“CLICK EVENT”事件输入如下代码：if mandgroup1.value=2thisform.releaseelsecstr=“请选择你所在城市;+thisform.optiongroup1.buttonsthisform.optiongroup1.value.captioncstr=cstr

16、+你的爱好第第6章章 表单的设计表单的设计if thisform.check1.value=1cstr=cstr+thisform.check1.captionendifif thisform.check2.value=1cstr=cstr+thisform.check2.captionendifif thisform.check3.value=1cstr=cstr+thisform.check3.captionendifthisform.edit1.value=cstrendif第第6章章 表单的设计表单的设计1、表单（Form）或表单集（Formset)对象常用语句：Thisform.re

17、lease表单释放Thisform.refresh表单刷新Thisform.hide表单隐藏（对表单集中的一 个表单）thisform.parent.form1.show表单显示（对表 单集中的一个表单）补补 充：充：第第6章章 表单的设计表单的设计在主菜单在主菜单 “表单表单”中选中选”添加表单添加表单”或或“移除表单移除表单”2、添加、移除表单、添加、移除表单第第6章章 表单的设计表单的设计创建一个表单，添加控件，要求设置控件属性，利用控件代码来设置属性等方法，来完成如图6-39所示的结果。操作步骤如下：P1866.3 表单控件的综合运用表单控件的综合运用6.3.1 用表单实现求水仙花数用

18、表单实现求水仙花数 创建一个表单，添加控件，要求设置控件属性，利用控件代码来设置属性等方法，来完成如图6-40所示的结果。操作步骤如下：P1876.3.2 制作一个会移出屏幕的欢迎界面制作一个会移出屏幕的欢迎界面 第第6章章 表单的设计表单的设计创建一个表单，添加控件，要求设置控件属性，利用控件代码来设置属性等方法，来完成如图6-41所示的结果。操作步骤如下：P1886.3.3 制作一个会移动的欢迎字幕制作一个会移动的欢迎字幕 创建一个表单，添加控件，要求设置控件属性，利用控件代码来设置属性等方法，来完成如图6-42所示的结果。操作步骤如下 ：P1896.3.4 利用列表框制作弹出菜单利用列表框制作弹出菜单 创建一个表单，添加控件，要求设置控件属性，利用控件代码来设置属性等方法，来完成如图6-43所示的结果。操作步骤如下：P1906.3.5 在表单中制作一个在表单中制作一个baidu搜索器搜索器 第第6章章 表单的设计表单的设计创建一个表单，添加控件，要求设