实验十 单表表单设计.docVIP

实验十 单表表单设计 ────────────────────────────────── 一、实验目的 1、掌握创建表单及对其属性和方法的设置； 2、掌握创建数据环境类，添加表或关系； 3、掌握使用控件类，将控件与环境中的数据源连接在一起操作 二、实验内容与操作步骤 先双击F:\STU\PUBLIC\VFP6\EX10下的文件EX10.EXE，然后设置VFP的默认工作目录为D:\EX10,并完成以下各操作。最后将操作结果存入D:\EX10文件夹中。 实验1：建立如下图所示表单，在该表单中建立一个标题为欢迎你参加省统考的标签(Label1)、一个标题为请选择显示字体:的标签(Label2)和一个包含有两个横向排列的命令按钮组(CommandGroup1),其中有黑体按钮(Command1)和隶书按钮(Command2)。当单击黑体按钮时，标签Label1的文字以黑体显示，单击隶书按钮时，标签Label1的文字改为以隶书显示。 操作步骤： 1、从菜单文件?新建?表单，打开表单设计器，新建一名为“FORM1”的表单； 2、在其属性窗口中设置：High:150,Width:320； 3、从表单控件工具栏选取标签控件类，向表单添加两个标签控件Label1和Label2； 4、在Label1的属性窗口设置：Autosize: .T.,Caption:欢迎你参加省统考，Fontsize:20；在Label2的属性窗口设置：Autosize: .T.,Caption:请选择显示字体，Fontsize:12；然后将它们拖放到适当的位置； 5、从表单控件工具栏选取命令按钮组控件类，向表单添加一按钮组控件“Commandgroup1”； 6、右击该控件?生成器……，设置按钮数目为2，布局为水平；在属性窗口中设置Command1的Caption：黑体，Fontname:黑体，Command2的Caption：隶书，Fontname: 隶书；然后将其拖放到适当的位置； 7、双击“Commandgroup1”，进入代码编辑窗口，在过程的下拉列表中选取Click；然后在代码编辑窗口输入如下代码： do case case this.value=1 thisform.label1.fontname=黑体 case this.value=2 thisform.label1.fontname=隶书 endcase 8、关闭代码编辑窗口，用“实验1.scx”为文件名保存该表单，然后试运行。 实验2：建立如下图所示表单，查看学生的基本情况及成绩。 操作步骤： 1、建立一数据库jxgl.dbc，将学生、成绩表添加其中，并将学生与成绩建立一对多的连接； 2、新建一表单，设置其数据环境，将库中的二个表添加其中；方法：右击表单?数据环境……?添加 3、在表单中加入一标签Label1，设置其属性：Autosize:.T.；Caption:学生情况查询；Fontsize:22 4、打开数据环境，将学生表中的学号、姓名、性别、专业、照片、简历字段拖进表单中的适当位置 5、删除性别和专业的文本框，加入单选按钮组和组合框，单选按钮组设置：右击?生成器……，按钮数目：2，标题：男、女，布局：水平，值：学生.性别；组合框的设置：右击?生成器……，列表项：学生表中的专业字段，样式：下拉列表，值：字段名处选：学生.专业 6、设置OLB照片的Stretch:2-变比填充 7、加入一表格，右击?生成器……，在表格项设置：选择成绩表中的课号、平时、期中、期末字段 8、加入一命令按钮组，右击?生成器……，按钮数目：5，标题如上图所示，布局：水平 9、双击命令按钮组，进入代码编辑窗口，选取Click事件，并编辑如下代码： sele 学生 do case case this.value=1 go top case this.value=2 if bof() go top else skip -1 endif case this.value=3 skip if eof() go bottom