《中文Visual FoxPro基础教程 教学课件 ppt 作者 任心燕 第4章-生成用户界面》由会员分享，可在线阅读，更多相关《中文Visual FoxPro基础教程 教学课件 ppt 作者 任心燕 第4章-生成用户界面（236页珍藏版）》请在金锄头文库上搜索。
1、,第4章 生成用户界面,4.1 编写VFP的程序,4.1.1 程序设计的基本概念 1数据容器 数据容器允许在多个数据上进行相同的操作。,2数据类型 数据类型决定了数据的存储方式和使用方式。,3处理数据 数据容器和数据类型构成了处理数据的基础，而对数据的处理最终要通过操作符、函数和命令来实现。,4程序流的控制,5程序设计的过程 程序设计的基本步骤如下： 对问题进行说明； 分解问题； 编制各模块； 测试并完善各模块； 组装全部模块； 整体测试。,4.1.2 存储数据 1常量 常量是一个命名项，该项的值在整个操作过程中保持不变。,2变量 变量是内存中的一个位置，它的值在程序操作过程中可变。,（1）变
2、量赋值 可以使用STORE命令或=（等号）操作符给一个Visual FoxPro命名元素赋值。,（2）访问变量 如果变量与字段同名，Visual FoxPro 总是给字段名以优先权。为此，可在变量名前加上m.或m-，以表示是引用变量而不是引用同名的字段名。,3数组 数组由一系列被称为元素的有序数据值构成，它们有相同的名字，并用序号来引用不同的元素。,4字段 字段是记录中拥有特定数据类型的命名位置。,5对象 对象是类的实例，类是对于拥有数据和一定行为特性的对象集合的描述。,6作用域 （1）Private 该命令在当前程序中隐藏指定的、在调用程序中定义的内存变量或数组。,格式： PRIVATE V
3、arList 或者 PRIVATE ALLLIKE Skeleton | EXCEPT Skeleton,（2）Public 该命令定义全局内存变量或数组。,格式： PUBLIC MemVarList 或者 PUBLIC ARRAY ArrayName1(nRows1 , nColumns1) , ArrayName2(nRows2 , nColumns2) AS type OF ClassLib,（3）Local 该命令创建局部内存变量和内存变量数组。,格式： LOCAL Var1 AS type OF ClassLib | ArrayName1(nRows1, , nColumns1) A
4、S type OF ClassLib , Var2 AS type OF ClassLib , ArrayName2(nRows2, , nColumns2) AS type OF ClassLib ,或者 LOCAL ARRAY ArrayName1(nRows1 , nColumns1) AS type OF ClassLib , ArrayName2(nRows2 , nColumns2) AS type OF ClassLib ,4.1.3 操作符 操作符用来处理同种类型的数据。Visual FoxPro 操作符按字符操作符、日期和日期时间操作符、逻辑操作符、关系操作符和数值操作符进行
5、分组。,1字符操作符,2日期和日期时间操作符,3逻辑操作符,4关系操作符,5数值操作符,4.1.4 注释 1* Comments 该命令标明程序文件中非执行的注释行的开始。,2& Comments 该命令标明程序文件中非执行的内部注释的开始。,3NOTE Comments 在程序文件中指示注释行的开始，注释行不可执行。,4.1.5 条件分支 条件分支是指根据条件的测试结果执行不同的操作。,该语句根据逻辑表达式的取值，有选择地执行一组命令。,其格式为： IF lExpression THEN Commands ELSE Commands ENDIF,2DO CASEENDCASE 根据条件表达式
6、不同的取值结果执行不同的命令。,其格式为： DO CASE CASE lExpression1 Commands CASE lExpression2 Commands,. CASE lExpressionN Commands OTHERWISE Commands ENDCASE,4.1.6 循环 循环结构是指可以按照需要多次重复执行一行或多行代码。,其格式为： SCAN NOOPTIMIZE Scope FOR lExpression1 WHILE lExpression2 Commands LOOP EXIT ENDSCAN,2FORENDFOR FOR Var = nInitialValu
7、e TO nFinalValue STEP nIncrement Commands EXIT LOOP ENDFOR | NEXT,3DO WHILEENDDO 其格式为： DO WHILE lExpression Commands LOOP EXIT ENDDO,4.1.7 查找时的常用命令 1顺序查找的常用命令 命令格式：LOCATE FOR lExpression1 Scope 命令功能：按顺序搜索表，找到满足指定逻辑表达式的第一个记录。,其中的FOR lExpression1表示让LOCATE按顺序搜索当前表，以找到满足表达式lExpression1的第一个记录。Scope指定要定位的
8、记录范围，可以使用ALL、NEXT 记录数、RECORD 记录号、REST四种范围。,命令格式：CONTINUE 命令功能：继续执行先前的LOCATE命令。,函数格式：FOUND( ) 函数功能：该函数返回一个逻辑值，指明最近执行的命令LOCATE、CONTINUE是否成功。如果搜索成功，该函数返回值“真”（.T.）。,2显示记录命令 命令格式： DISPLAY FIELDS FieldList Scope FOR lExpression1 WHILE lExpression2,OFF & 不显示记录号 NOCONSOLE & 不向窗口中输出 TO PRINTER PROMPT | TO FI
9、LE FileName & 向打印机或文件输出,3暂停命令 命令格式： WAIT cMessageText TO VarName,WINDOW AT nRow, nColumn NOWAIT CLEAR | NOCLEAR TIMEOUT nSeconds,4显示命令结果的开关命令 命令格式： SET TALK ON | OFF | WINDOW WindowName | NOWINDOW,4.1.8 程序实现 （1）建立表的结构。,图4-1-1 表结构,（2）输入数据。 （3）编写程序。 （4）运行程序。 （5）运行下面的程序，可以显示friend表中所有城市为“北京”的记录。,4.1.9
10、程序拓展,图4-1-7 建立程序,图4-1-8 输入程序,图4-1-9 保存程序后的项目管理器,4.2 一个演示表单,4.2.1 表单 1面向对象程序设计 （1）属性 （2）方法程序 （3）事件,2表单设计器 （1）创建一个新的表单,图4-2-1 “表单设计器”窗口和“表单控件”工具栏,（2）用“快速表单”命令添加字段 （3）保存表单 （4）运行表单,3表单的基本操作 （1）向表单中添加控件 （2）用生成器向表单中添加控件 （3）添加控件和设置控件属性,4Visual FoxPro中的对象 （1）属性 （2）方法程序 （3）事件,（4）常用对象 Thisform对象 This对象 Applic
11、ation _SCREEN系统变量,4.2.2 表单的属性、方法和事件 1常用属性,2常用方法 （1）Box 功能：在表单对象上画矩形。 格式：Object.Box(nXCoord1, nYCoord1, nXCoord2, nYCoord2) 或者 Object.Box(nXCoord2, nYCoord2),（2）Circle 功能：在表单上画一个圆或椭圆。 格式：Object.Circle (nRadius , nXCoord, nYCoord , nAspect),（3）Cls 功能：清除表单中的图形和文本。 格式：Object.Cls,（4）Draw 功能：重画表单对象。 格式：Ob
12、ject.Draw,（5）Hide 功能：通过把Visible属性设置为“假”（.F.），隐藏表单、表单集或工具栏。 格式：Object.Hide,（6）Line 功能：在表单对象中画一条线。 格式：Object.Line(nXCoord2, nYCoord2) 或者 Object.Line(nXCoord1, nYCoord1, nXCoord2, nYCoord2),（7）Move 功能：移动一个对象。 格式：Object.Move (nLeft , nTop , nWidth , nHeight),（8）Point 功能：返回一个表单上特定点的红-绿-蓝（RGB）颜色。 格式：Objec
13、t.Point (nXCoord, nYCoord),（9）Print 功能：在表单对象上打印一个字符串。 格式：FormSet. Object.Print (cText),（10）PSet 功能：把一个表单或 Visual FoxPro 主窗口中的一个点设置成前景色。 格式：FormSet.Object.PSet(nXCoord, nYCoord),（11）Refresh 功能：画表单或控件，并刷新所有值，或者刷新一个项目的显示。 格式：Form.Object.Refresh,（12）Release 功能：从内存中释放表单。 格式：Object.Release,（13）SetViewPort
14、 功能：设置表单的ViewportLeft和ViewportTop属性的值。 格式：Object.SetViewPort(nLeft, nTop),（14）Show 功能：显示一个表单，并且确定是模式表单还是非模式表单。 格式：FormSet.Object.Show(nStyle),（15）TextHeight 功能：返回以当前字体显示的文本字符串高度。 格式：nHeight = Form.TextHeight(cText),（16）TextWidth 功能：返回以当前字体显示的文本字符串宽度。 格式：nWidth = Form.TextWidth(cText),3常用事件,4.2.3 程序实
15、现,图4-2-2 设置选项组的初始值,图4-2-3 设置容器外观,图4-2-4 编辑容器,图4-2-5 设置复选框的标题,图4-2-6 绘制了控件的表单,图4-2-7 开始运行窗口,图4-2-8 直接绘制图形,图4-2-9 准备输入文字,图4-2-10 斜体输出,4.2.4 程序拓展 1用表单向导创建表单 2两个不同的表单向导,3表单向导 步骤1：字段选取 步骤2：选择表单样式 步骤3：排序次序 步骤4：完成,4一对多表单向导 步骤1：从父表中选定字段。 步骤2：从子表中选定字段。 步骤3：建立表之间的关系。 步骤4：选择表单样式。 步骤5：排序次序。 步骤6：完成。,5快速生成表单 6利用“一对多表单向导”创建一对多表单,图4-2-11 选取向导,图4-2-12 从父表中选定字段,图4-2-13 从子表中选定字段,图4-2-14 建立表之间的关系,图4-2-15 选择表单样式,图4-2-16 排序次序,图4-2-17 完成表单向导,4.3 建立销售管理系统的对话框,4.3.1 显示信息 1图像
