表单的设计.pptVIP

表单设计 表单向导的使用： 例1：标签 过程如下： 第一个按钮的click代码为 Thisform.label1.visible=.t. 第二个按钮的click代码为： Thisform.left= Thisform.left+20 Thisform.top= Thisform.top+30 第三个按钮的click代码为 Thisform.release 例2：文本框 x=thisform.text1.value) y=thisform.text2.value) h=x+y thisform.text3.value=h 注意结果合理不？为什么呢？？ 求和按钮的click代码如下： x=val(thisform.text1.value) y=val(thisform.text2.value) h=x+y thisform.text3.value=h 注意：文本行的值如何获得。 例3：登陆界面的设计 注意(1)密码框中输入的不能看到，要设置text2的passwordchar属性为* (2)text1的click代码如下 Messagebox 16 x 32 ? 48 ! 64 i 例4： 步骤如下： 1 先把界面构建出 2 在编辑状态下，点击右键的“数据环境”，把要用到的表添加进来 3 把每个要显示数据的文本行绑定数据。 选中文本行，属性找到controlsource 4 给下面的4个按钮写代码 第一个：go top thisform.refresh 第二个：skip -1 thisform.refresh 例5：计时器控件： 例：设计一个电子时钟， 用文本框显示时间，时间每一秒跳动一次。 走马灯效果 Thisform.label1.left= Thisform.label1.left-5 If Thisform.label1.left- Thisform.width Thisform.label1.left= Thisform.width endif 例6：表格 步骤如下： 1 添加一个表格控件 2 在控件上点击右键，选择“生成器”，选择表名 ，选择要 显示的字段 3 运行表单即可。 例7 ：查找数据，输入姓名，结果显示在表格中 查询按钮代码如下 ： select * from 人才档案 where 编号=alltrim(thisform.text1.value) into cursor we if reccount()0 thisform.text2.value=we.姓名 thisform.text3.value=we.性别 else = messagebox(没有这个人) endif 例11 按钮组 练习 组合框 08年001 文本框输入 弹出浏览窗口 08-011 答对答错 08年005 [单选题]在默认情况下，文本框的Value属性的值是_______。 ????（A）、 ?字符型 ????（B）、 ?数值型 ????（C）、 ?日期型 ????（D）、 ?逻辑型 [单选题]执行命令CREATE FORM FF后，_______。 ????（A）、 ?必定同时存在成对的 FF.dbc和 FF.dct ????（B）、 ?必定同时存在成对的 FF.fpt和 FF.frx 文件 ????（C）、 ?必定同时存在成对的 FF.sct和 FF.scx 文件 ????（D）、 ?必定同时存在成对的 FF.mnx和 FF.mpr 文件 [单选题]在表单中，标签不拥有的属性是_______。 ????（A）、 ?FontBold ????（B）、 ?Value ????（C）、 ?Enabled ????（D）、 ?FontSize [单选题]文本框所显示的内容是由_______值确定的。 ????（A）、 ?Wordwrap 属性 ????（B）、 ?Text属性 ????（C）、 ?Value 属性 ????（D）、 ?Caption 属性 组合框设置 先选择类型 再选择来源 拖一个按钮组进来，右键“生成器”设置按钮个数和显示的文字 按钮组练习.scx * * 标签 标签 标签 例13.7 例13.8 一、创建表单方式 1 命令方式 create form 表单名 注意：表单后缀名为.scx,同时配对生