第八章表单设其应用.ppt

第八章 表单设计及应用;第八章 表单设计及其应用;8.1 创建表单;1.表单设计器环境 2.表单控件工具栏 3.属性窗口;1.数据环境设计器 (1)选择显示|数据环境命令 (2)右击表单界面,选数据环境; ;[例1] ：设计一个表单，实现标签文字边移动边变色。 讲述内容：无控件表单 标签控件 计时器控件 计时器timer事件 设计步骤如下：;[步骤1]设计一个名为“移动变色”的无控件表单:;标 签控件;计时器控件;标签;[步骤4] 计时器timer事件代码:;[例2] ：设计一个幸运七游戏，文件名字为my_formxy7.scx。 讲述内容： 命令按钮控件 文本框控件 命令按钮单击(click)事件 设计步骤如下：;命令按钮控件;文本框控件;幸运七游戏设计界面;thisform.t1.value=int(rand( )*10) thisform.t2.value=int(rand( )*10) thisform.t3.value=int(rand( )*10) if thisform.t1.value=7.or.thisform.t2.value=7.or.thisform.t3.value=7 thisform.lbl1.caption=赢 else thisform.lbl1.caption=输 endif;[例3]：密码判断 设计一个名为 mima.scx的表单。如图所示:单击确认按钮判断密码是否为aaa，是执行幸运七游戏，否则释放。要求：text1的最大长度为8。 密码输入时显示为* .;确认的单击事件代码如下： if thisform.text1.value=aaa Do form my_formxy7 else thisform.release Endif 其它提示： 最大长度：maxlength 密码输入显示*: passwordchar;[例4]：标签缩放 设计一个名为my_form4的表单,实现标签的缩放。计时器的interval属性为300;表单运行时计时器不起作用,即计时器的enabled属性为：.f. 。单击变按钮时，五角星开始变大，字号每次增加5，当字号增加到100时，再从10开始，每次字号增加5到100，这样不断的增加。 单击停止时，五角星停止变化。;提示：标签的caption属性为☆. 对五角星的变大变小的程序语句写到计时器的timer事件中。 变按钮的click事件为： thisform.timer1.enabled=.t. 停止按钮的click事件为：thisform.timer1.enabled=.f. 计时器单击事件： if thisform.label1.fontsize=100 thisform.label1.fontsize=10 else thisform.label1.fontsize=thisform.label1.fontsize+5 endif ;[例5]：文字变化 讲述内容：列表框 组合框 复选框 选项按钮组 设计结果如下：;1.列表框（list） 主要用来显示选择项，用户可以从中选择一个或多个数据项。 主要属性： Rowsource Rowsourcetype 当rowsourcetype 设置值为1,值源类型为值 Rowsource写出具体值，之间逗号相隔. 当rowsourcetype 设置值为6,值源类型为字段,rowsource选择所需字段. ;[步骤1]新建表单，画出列表框（list1)， 并设置如下属性： Rowsourcetype 1 值 Rowsource 黑体,宋体,华文行楷,隶书 (注意逗号);2.组合框 组合框用于在列表框中选取数据并显示在编辑窗口，它有两种形式:下拉列表框，下拉组合框。 主要属性： style rowsource