设计一个表单.ppt

第八章 表单设计及其应用 主要内容: 8.1 创建表单 1.使用表单设计器创建表单 (1)菜单方式 (2)命令方式 CREATE FORM 表单文件名 2.使用表单向导创建表单 3.保存、修改和运行表单 修改：MODI FORM 表单文件名 运行：DO FORM 表单文件名 8.2 表单设计器 1.表单设计器环境 2.表单控件工具栏 3.属性窗口 8.3 表单的数据环境 1.数据环境设计器 (1)选择显示|数据环境命令 (2)右击表单界面,选数据环境 控件（control） 是放在表单上用以显示数据(label)、执行操作(command)或使表单更易阅读(list,shape)的一种图形对象 控件的不同以及处理任务的不同，其属性及其属性的设置、事件处理代码和方法程序也有所不同 本章结束,谢谢使用! [步骤5]设置form1的属性如下： caption 文化变化 autocenter .t. [步骤6]表单上画一标签，并设置如下属性： caption 文字变化 autosize .t. fontsize 24 最后设计界面 如右图： [步骤7] 编写列表框(list1)的单击事件(click)代码: do case case this.value=黑体 thisform.label1.fontname=黑体 case this.value=宋体 thisform.label1.fontname=宋体 case this.value=华文行楷 thisform.label1.fontname=华文行楷 case this.value=隶书 thisform.label1.fontname=隶书 endcase [步骤8] 编写组合框(combo1)的click事件代码: do case case this.value=红 thisform.label1.forecolor=rgb(255,0,0) case this.value=黄 thisform.label1.forecolor=rgb(255,255,0) case this.value=绿 thisform.label1.forecolor=rgb(0,255,0) case this.value=黑 thisform.label1.forecolor=rgb(0,0,0) endcase [步骤9] 编写复选框(check1)的click事件代码: IF THIS.VALUE=1 THISFORM.LABEL1.FONTBOLD=.T. ELSE THISFORM.LABEL1.FONTBOLD=.F. ENDIF 复选框2和3提示: 倾斜: fontitalic 加粗: fontbold [步骤10] 编写复选框(check1)的click事件代码: do case case this.value=1 thisform.label1.fontsize=10 case this.value=2 thisform.label1.fontsize=20 case this.value=3 thisform.label1.fontsize=30 case this.value=4 thisform.label1.fontsize=40 endcase 文字变化例题结束,共10步骤! 课堂练习: 文件名为My_form11, 有一组合框， rowsourcetype=1 rowsource=农电,农发 ,植保 有一文本框。 功能:当在组合框中选定一专业后，立刻在文本框中显示此专业全称，农电为“农业电气与自动化”，农发为“农村区域发展”，植保为“植物保护”。 微调控件 可在微调控件框中输入一个值，或通过按钮选择一个值，其作用是确保数据的使用范围。一般情况下，它主要用于数值型数据的输入。 属性主要包括： Keyboardhighvalue 输入的最大值。 Keyboardlowvalue 输入的最小值。 Increment 每次单击按钮的增减值。 Value