[互联网]表单设计.ppt

第5章 表单设计及运行 ThinkPad E30全拆解 学生管理系统 表单设计 一个应用程序的好坏，给用户的第一印象既不是程序代码的好坏，也不是运行效率的高低，而是用户界面是否友好。 问题的提出： 怎样设计出界面友好的程序。 解决问题的方法： Visual FoxPro 6.0提供了设计界面的方法,可以通过表单设计，使程序界面美观、更加友好。 本 章 要 点 属性窗口 VFP常用事件 表单文件(.scx)保存表单的各项规格定义 定义此表单的各项信息,如高度、宽度、颜色、标题等 表单上控件的信息 数据来源 事件程序代码 无控件表单 设计“标签”控件表单 在运行时设置表单中对象的属性 由于修改属性的程序必须放在事件代码中，所以若想在运行时设置一个对象A的属性，则必须编写某个对象B的事件代码，于是首先需要确定这两个对象与容器层次的关系，下表列出了表单中各对象之间引用时需要用到的属性和关键字。确定了对象之间的容器层次关系后，在代码中用下述格式设置属性： 容器名.控件名.属性=属性值 表 用于对象引用的属性和关键字 设计“文本框”控件表单 常用属性 Value:指定文件框的值，并显示。其值的类型可以为N型、C型、D型、T型、L型。也可以用命令方式设置，如：ThisForm.Text1.Value=“(0551)5169268” InputMask:掩码输入。规定在文本框中如何输入和显示数据。由若干格式符组成： X允许输入任何字符 9只允许输入数字和正负号 *在数值左边显示*号 #允许输入数字、正负号和空格 如： InputMask设置为99,999.99时，则只能输入具有两位小数且小于100000的数值。 ControlSource:设置与文本框绑定的数据源 PasswordChar:控制是否显示用户实际输入的数据。设置为*时，只显示相同个数的*。 设计“命令按钮”控件表单 “红”按钮Click代码： ThisForm.BackColor=rgb(255,0,0) “绿”按钮Click代码： ThisForm.BackColor=rgb(0, 255, 0) “蓝”按钮Click代码： ThisForm.BackColor=rgb(0,0,255) “退出”按钮Click代码： ThisForm.Release 设计“命令按钮组”控件表单 a = val(THISFORM.Text1.Value) n = THIS.Value DO CASE case n=1 y=0.9*a CASE n=2 y=0.8*a endcase thisform.label3.caption=str(y)+元 计算器 利用“命令按钮组”设计一个如图10-37所示的计算器，要求有4种运算和清零功能 Do Case Case This.Value=1 ThisForm.Text3.Value=ThisForm.Text1.Value+ThisForm.Text2.Value Case This.Value=2 ThisForm.Text3.Value=ThisForm.Text1.Value-ThisForm.Text2.Value Case This.Value=3 ThisForm.Text3.Value=ThisForm.Text1.Value*ThisForm.Text2.Value Case This.Value=4 If ThisForm.Text2.Value#0 判断除数是否为0 ThisForm.Text3.Value=ThisForm.Text1.Value/ThisForm.Text2.Value Else MessageBox(除数不能为零！,48) EndIf Otherwise 功能同Case This.Value=5 ThisForm.Text1.Value=0 ThisForm.Text2.Value=0 ThisForm.Text3.Value=0 EndCase 设计“单选按钮”OptionGroup控件表单 【例】 创建如图5-53所示表单，定义一个名称为“OptionGroup1”的单选按钮组，所含按钮个数为4，标题依次为“宋体”、“隶书”、“黑体”和“幼圆”，当选中某个按钮时，文本框中的字体发生相应的变化，用Do Case结构编写“OptionGroup1”的Click事件代码； 在控件窗口中选择单选按钮组控件，在表单的适当位置拖放，在该控件的属性窗口中，将ButtonCount设置为4，其中四个