基于VFP和SQL的数据库技术及应用第4章.ppt

2. 运行应用程序 在命令窗口中输入以下运行命令可以运行应用程序。 命令格式：DO〈文件名〉[with参数表] 说明：FoxPro允许使用带参数的程序文件。在编写带参数的程序文件时，必须把命令 PARAMETERS 参数表作为程序中的第一条命令。其中的参数是有效的任意变量名，在参数表中可以出现一个或多个参数，各参数之间用逗号分隔，这里的参数又称为形式参数。 DO命令中的可选项[with参数表]用于执行带参数的程序文件。 例4-19 带参数程序文件的编制与调用示例。 在程序编辑窗口中输入以下程序: PARAMETERS r L=2*3.14*r S=3.14*r*r ?圆的周长为：,L ? 圆的面积为: ,S 通过“文件”菜单的“保存”命令，将程序进行存盘操作，默认程序名为“程序1”。 在命令窗口中键入运行命令 DO 程序1.prg with 5 便可在主窗口中看到程序的运行结果。 当然，在Visual FoxPro中还可以通过菜单命令运行程序文件。单击“程序”菜单的“运行”命令将打开“运行”对话框，如图4-2所示。 图4-2 运行对话框 4.2.2 顺序结构 与其他高级语言程序相似，Visual FoxPro程序也有3种基本控制结构：顺序结构，选择结构及循环结构。顺序结构按命令的书写次序依次执行；选择结构能根据指定条件的当前值在两条或多条程序路径中选择一条执行；循环结构由指定条件的当前值来控制循环体中的命令序列是否重复执行。 前面章节介绍的命令都可以作为顺序执行的语句来使用，即在编程时按照处理过程的先后顺序将所有命令语句顺序排列，程序在运行时，也将按照命令的排列顺序逐条执行，这种结构就称为顺序结构。 例4-20 对学生情况表中的记录进行操作。 程序清单如下： Use 学生情况表 Insert into学生情况表 values(“2001502”， “李华文”, “女”, CTOD(1983-09-07), 计算机1班, 2330123) Select * from 学生情况表 where 学号=2001502 wait Update学生情况表 set 班级= 计算机2班 Select * from 学生情况表 where 学号=2001502 use 程序在执行时，按照以上语句自上而下的排列顺序，先打开数据表“学生情况表”，插入一条记录，并进行查询显示，然后又把刚插入的记录进行编辑，把班级改成“计算机2班”，再显示这条记录，最后关闭数据库。 4.2.3 选择结构 选择结构根据条件的测试结果执行不同的操作。Visual FoxPro提供下面3种格式来实现选择结构的程序。 1. IF语句 语句格式： IF条件 命令序列 ENDIF 功能：用来进行各种条件判断，使程序中的命令有条件地执行。 这种选择结构叫单边选择结构。执行这种形式的命令时，首先对条件进行判断，如果条件为真，则执行命令序列，否则程序将跳过IF语句，直接执行ENDIF后面的语句，IF语句执行程序流程如图4-3所示。 图4-3 单边选择结构流程图 例4-21 根据输入确定是否清空学生情况表中的所有记录。 程序清单如下： CLEAR SET TALK OFF ACCEPT 清空学生情况表中的所有纪录吗(Y/N) ？ TO aa IF upper(aa)= Y Delete from 学生情况表 ENDIF SET TALK ON 2. IF ELSE语句 语句格式： IF条件 命令列序1 ELSE 命令列序2 ENDIF 这种选择结构叫双边选择结构。执行这种程序结构时，将根据条件的取值在这两条路径中选择一条执行，如果条件为真，则执行命令序列1，否则执行命令序列2。 图4-4 双边选择结构流程图 例4-22 安全检查程序。 程序清单如下： CLEAR SET TALK OFF ACCEPT 请输入您的密码： TO aa IF aa123 ? 您无权使用 QUIT ELSE ? 欢迎您使用 ENDIF SET TALK ON 3. DO CASE语句 语句格式： DO CASE CASE条件1 命令序列1 CASE条件2